--- gforth/see.fs 2003/03/22 10:04:07 1.52 +++ gforth/see.fs 2004/01/13 16:00:55 1.53 @@ -794,7 +794,7 @@ Defer discode ( addr u -- ) \ gforth else \ interpret/compile word r@ xt-see-xt cr swap xt-see-xt cr - ." interpret/compile " over .name (.immediate) + ." interpret/compile: " over .name drop then then rdrop drop ;