[Easycalc-commits] easycalc/mlib stack.c,1.36,1.37

[Jorge G. <cl...@us...>]

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;
+ }
+ 
  /***********************************************************************
   *