Diff for /gforth/prims2x.fs between versions 1.100 and 1.101

version 1.100, 2001/11/11 22:33:31 version 1.101, 2001/12/09 19:12:45
Line 647  stack inst-stream IP Cell Line 647  stack inst-stream IP Cell
     2drop type ;      2drop type ;
   
 : print-entry ( -- )  : print-entry ( -- )
     ." CASE I_" prim prim-c-name 2@ type ." :" ;      ." LABEL(" prim prim-c-name 2@ type ." ):" ;
           
 : output-c ( -- )   : output-c ( -- ) 
  print-entry ."  /* " prim prim-name 2@ type ."  ( " prim prim-stack-string 2@ type ." ) */" cr   print-entry ."  /* " prim prim-name 2@ type ."  ( " prim prim-stack-string 2@ type ." ) */" cr

Removed from v.1.100  
changed lines
  Added in v.1.101


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>