--- gforth/locals.fs 1995/11/07 18:06:48 1.3 +++ gforth/locals.fs 1995/11/29 20:20:36 1.4 @@ -83,7 +83,7 @@ Create inlocal 5 cells allot inlocal o : (local) ( addr u -- ) inlocal @ 0= IF postpone r loadline @ >r loadfile @ >r + dup IF linestart @ >r sourceline# >r loadfile @ >r blk @ >r >tib @ >r #tib @ dup >r >in @ >r >tib +! dup #tib ! >tib @ swap move