[gforth] / gforth / intcomp.fs  

gforth: gforth/intcomp.fs

Diff for /gforth/intcomp.fs between version 1.4 and 1.5

version 1.4, Thu Jul 31 16:17:09 1997 UTC version 1.5, Mon Oct 27 18:25:16 1997 UTC
Line 47 
Line 47 
     lastxt interpret/compile-int @ r@ >body = and      lastxt interpret/compile-int @ r@ >body = and
     lastxt interpret/compile-comp @ r> = and      lastxt interpret/compile-comp @ r> = and
     0= abort" not created with create-interpret/compile"      0= abort" not created with create-interpret/compile"
     [ /does-handler cell+ cell+ ] literal + \ to does-code      cell+ cell+ maxaligned /does-handler + \ to does-code
     swap @ does-code! ;      swap @ does-code! ;
   
 : (interpretation>) ( -- )  : (interpretation>) ( -- )

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help