--- gforth/utf-8.fs	2010/12/31 18:09:02	1.42
+++ gforth/utf-8.fs	2011/12/31 15:29:25	1.44
@@ -1,6 +1,6 @@
 \ UTF-8 handling                                       12dec04py
 
-\ Copyright (C) 2004,2005,2006,2007,2008,2009,2010 Free Software Foundation, Inc.
+\ Copyright (C) 2004,2005,2006,2007,2008,2009,2010,2011 Free Software Foundation, Inc.
 
 \ This file is part of Gforth.
 
@@ -300,6 +300,9 @@ here wc-table - Constant #wc-table
     ['] +u8/string is +x/string
 [ [THEN] ]
     ['] u8@ is xc@
+[ [IFDEF] xc!+ ]
+    ['] u8!+ is xc!+
+[ [THEN] ]
     ['] u8!+? is xc!+?
     ['] u8@+ is xc@+
     ['] u8len is xc-size