--- gforth/cross.fs	1996/09/24 19:15:02	1.40
+++ gforth/cross.fs	1996/10/20 20:35:24	1.41
@@ -499,7 +499,7 @@ ghost unloop    ghost ;S
 ghost lit       ghost (compile) ghost !         2drop drop
 ghost (does>)   ghost noop                      2drop
 ghost (.")      ghost (S")      ghost (ABORT")  2drop drop
-ghost '
+ghost '                                         drop
 
 \ compile                                              10may93jaw