--- gforth/cross.fs 2001/01/28 22:43:39 1.90 +++ gforth/cross.fs 2001/01/29 11:39:43 1.91 @@ -2211,7 +2211,7 @@ Builder Field : cell% ( n -- size align ) T 1 cells H dup ; -Build: ( m v -- m' v ) dup T , H cell+ ; +Build: ( m v -- m' v ) dup T , cell+ H ; DO: abort" Not in cross mode" ;DO Builder input-method