--- gforth/utf-8.fs	2006/02/19 17:27:12	1.19
+++ gforth/utf-8.fs	2006/02/19 22:15:05	1.20
@@ -144,7 +144,9 @@ $80 Value max-single-byte
     ['] u8!+? is xc!+?
     ['] u8@+ is xc@+
     ['] u8len is xc-size
+[ [IFDEF] x-width ]
     ['] u8width is x-width
+[ [THEN] ]
     ['] -u8trailing-garbage is -trailing-garbage
 ;