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
|
/*
\funcref{fun\_atoi}{void fun\_atoi ()}
{}
{}
{discard()}
{fun\_atol(), etc.}
{funatoi.c}
{
This funtion converts the string variable which was last pushed to an
integer variable. The {\em type} field of the last used stack position
(this is {\em stack[sp]}) is set to {\em e\_int} and the {\em
vu.intval} field is assigned to hold the integer representation of the
{\em vu.str} field.
The string variable which occupied the stack is discarded.
}
*/
#include "opcodefun.ih"
void fun_atoi()
{
INTVAR_ value = *intConstructor_i(atoi(stringStr(top())));
assign(top(), &value);
intDestructor(&value);
}
|
