1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
/*
\funcref{fun\_itoa}{void fun\_itoa ()}
{}
{}
{newvar(), xstrdup()}
{fun\_atoi(), etc.}
{funitoa.c}
{
This funtion converts the integer variable which was last pushed to a
string variable. The {\em type} field of the last used stack position
(this is {\em stack[sp]}) is set to {\em e\_str} and the {\em
vu.str} field is assigned to hold the string representation of the
{\em vu.intval} field.
}
*/
#include "opcodefun.ih"
void fun_itoa()
{
char buffer[100];
sprintf(buffer, "%d", intValue(top()));
{
VAR_ str = *stringConstructor_cP(buffer);
assign(top(), &str);
stringDestructor(&str);
}
}
|
