[gforth] / gforth / abi-code-test.fs  

gforth: gforth/abi-code-test.fs

Diff for /gforth/abi-code-test.fs between version 1.4 and 1.5

version 1.4, Sun May 2 16:07:50 2010 UTC version 1.5, Sun May 2 18:15:14 2010 UTC
Line 56 
Line 56 
   
 7 my-constant2 bar  7 my-constant2 bar
 : bar-compiled bar ;  : bar-compiled bar ;
   
   bar 7 <> throw
   bar-compiled 7 <> throw
   
   code my-1+ ( n1 -- n2 )
       8 #        bx add
       r14 inc
       -8 bx d)   jmp
   end-code
   
   : compiled-my-1+
       my-1+ ;
   
   7 my-1+ 8 <> throw
   8 compiled-my-1+ 9 <> throw
   
   : funny-compiler-test
       drop my-1+ 1 ;
   
   \ 6 9 funny-compiler-test 1 <> throw 7 <> throw


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