1 /* 2 This function is called when a call to the built-in function {\em 3 ascii} is to be processed. This function represents the opcode {\em 4 op\_ascii\_int}: a string is converted to an int. 5 6 If the last pushed value is a string, then the return register 7 is set to the integer (ASCII number) representation of the first 8 character in the string. 9 */ 10 11 #include "builtin.ih" 12 13 static char buf[2]; 14 b_asciiString()15void b_asciiString () 16 { 17 buf[0] = int_value(stack_top()); 18 stringcons_charPtr(eb_releaseReg(), buf); 19 } 20