[gforth] / gforth / wordinfo.fs  

gforth: gforth/wordinfo.fs

Diff for /gforth/wordinfo.fs between version 1.2 and 1.3

version 1.2, Wed May 18 17:30:03 1994 UTC version 1.3, Fri Jun 17 13:28:33 1994 UTC
Line 21 
Line 21 
   
 : var?  ( nfa -- flag )  : var?  ( nfa -- flag )
         (name>)          (name>)
         >code-address ['] leavings >code-address = ;          >code-address ['] udp >code-address = ;
   
 : con?  ( nfa -- flag )  : con?  ( nfa -- flag )
         (name>)          (name>)

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help