[gforth] / gforth / kernel / accept.fs  

gforth: gforth/kernel/accept.fs

Diff for /gforth/kernel/accept.fs between version 1.14 and 1.15

version 1.14, Fri Dec 31 13:24:03 2004 UTC version 1.15, Wed Jan 12 21:21:53 2005 UTC
Line 62 
Line 62 
     everyline      everyline
     rot over      rot over
     2dup type      2dup type
     BEGIN  key decode  UNTIL      BEGIN  xkey decode  UNTIL
     2drop nip ;      2drop nip ;
   
 : accept   ( c-addr +n1 -- +n2 ) \ core  : accept   ( c-addr +n1 -- +n2 ) \ core

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help