[gforth] / gforth / prims2x.fs  

gforth: gforth/prims2x.fs

Diff for /gforth/prims2x.fs between version 1.104 and 1.105

version 1.104, Sun Feb 10 14:02:25 2002 UTC version 1.105, Sun Jun 2 10:31:28 2002 UTC
Line 423 
Line 423 
     stack r@ type-stack !      stack r@ type-stack !
     rdrop ;      rdrop ;
   
 : type-prefix ( xt1 xt2 n stack "prefix" -- )  : type-prefix ( addr u xt1 xt2 n stack "prefix" -- )
     get-current >r prefixes set-current      get-current >r prefixes set-current
     create-type r> set-current      create-type r> set-current
 does> ( item -- )  does> ( item -- )


Generate output suitable for use with a patch program
Legend:
Removed from v.1.104  
changed lines
  Added in v.1.105

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help