--- gforth/cross.fs 2002/12/14 17:34:12 1.130 +++ gforth/cross.fs 2002/12/27 17:19:33 1.131 @@ -3229,7 +3229,7 @@ Cond: postpone ( -- ) \ name hex >CROSS -Create magic s" Gforth2x" here over allot swap move +Create magic s" Gforth3x" here over allot swap move bigendian 1+ \ strangely, in magic big=0, little=1 tcell 1 = 0 and or