--- gforth/ekey.fs	2003/08/25 14:17:44	1.9
+++ gforth/ekey.fs	2004/12/28 21:09:46	1.10
@@ -117,7 +117,7 @@ table constant esc-sequences \ and prefi
 create ekey-buffer 8 chars allot
 2variable ekey-buffered
 
-27 constant #esc
+[IFUNDEF] #esc  27 Constant #esc  [THEN]
 
 : esc-prefix ( -- u )
     key? if