--- gforth/wf.fs	2006/03/20 00:14:56	1.46
+++ gforth/wf.fs	2006/08/26 12:39:57	1.47
@@ -43,7 +43,7 @@ require string.fs
 	case
 	    '& of  ." &"  endof
 	    '< of  ." &lt;"   endof
-\	    '¤ of  ." &euro;" endof
+\	    &164 of  ." &euro;" endof
 	    dup emit
 	endcase
     LOOP ;