[gforth] / gforth / kernel / getdoers.fs  

gforth: gforth/kernel/getdoers.fs

Diff for /gforth/kernel/getdoers.fs between version 1.6 and 1.7

version 1.6, Sun Oct 29 20:27:03 2000 UTC version 1.7, Wed Jan 8 10:25:34 2003 UTC
Line 55 
Line 55 
     ['] reveal-method >code-address ;      ['] reveal-method >code-address ;
 [THEN]  [THEN]
   
 has? prims 0= [IF]  true [IF] \ !! don't know what to put here
 : dodoes: ( -- addr )   \ gforth  : dodoes: ( -- addr )   \ gforth
     \G The code address of a @code{field}???      \G The code address of a @code{field}???
     ['] spaces >code-address ;      ['] spaces >code-address ;

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help