[gforth] / gforth / prim  

gforth: gforth/prim

Diff for /gforth/prim between version 1.33 and 1.34

version 1.33, Sun May 16 17:13:22 1999 UTC version 1.34, Mon May 17 13:12:05 1999 UTC
Line 2178 
Line 2178 
 :  :
  up ! ;   up ! ;
 Variable UP  Variable UP
   
   wcall   u --    gforth
   IF_FTOS(fp[0]=FTOS);
   FP=fp;
   sp=(SYSCALL(Cell(*)(Cell *, void *))u)(sp, &FP);
   fp=FP;
   IF_TOS(TOS=sp[0];)
   IF_FTOS(FTOS=fp[0]);
   

Generate output suitable for use with a patch program
Legend:
Removed from v.1.33  
changed lines
  Added in v.1.34
CVS Admin

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help