Update of /cvsroot/easycalc/easycalc/mlib
In directory sc8-pr-cvs17:/tmp/cvs-serv18511
Modified Files:
stack.c
Log Message:
undo last changes
Index: stack.c
===================================================================
RCS file: /cvsroot/easycalc/easycalc/mlib/stack.c,v
retrieving revision 1.36
retrieving revision 1.37
diff -C2 -d -r1.36 -r1.37
*** stack.c 23 Sep 2006 22:13:05 -0000 1.36
--- stack.c 29 May 2007 15:19:13 -0000 1.37
***************
*** 515,518 ****
--- 515,531 ----
}
+ CError
+ stack_item_type_nr(CodeStack *stack,rpntype *type,Int16 itnum)
+ {
+ Trpn tmp;
+
+ if (stack->size<itnum)
+ return c_internal;
+ tmp = stack->stack[stack->size - itnum -1];
+
+ *type = tmp.type;
+ return c_noerror;
+ }
+
/***********************************************************************
*
|