[gforth] / gforth / cross.fs  

gforth: gforth/cross.fs

Diff for /gforth/cross.fs between version 1.62 and 1.63

version 1.62, Tue Dec 22 15:18:50 1998 UTC version 1.63, Tue Dec 22 21:17:14 1998 UTC
Line 1956 
Line 1956 
 >CROSS  >CROSS
 Create magic  s" Gforth2x" here over allot swap move  Create magic  s" Gforth2x" here over allot swap move
   
 bigendian  bigendian 1+ \ strangely, in magic big=0, little=1
 tcell 1 = 0 and  tcell 1 = 0 and or
 tcell 2 = 2 and or  tcell 2 = 2 and or
 tcell 4 = 4 and or  tcell 4 = 4 and or
 tcell 8 = 6 and or  tcell 8 = 6 and or


Generate output suitable for use with a patch program
Legend:
Removed from v.1.62  
changed lines
  Added in v.1.63

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help