--- gforth/glocals.fs	1996/07/16 20:57:09	1.23
+++ gforth/glocals.fs	1996/08/21 14:58:41	1.24
@@ -528,7 +528,7 @@ forth definitions
 	OF POSTPONE laddr# >body @ lp-offset, POSTPONE f! ENDOF
 	-&32 throw
     endcase ;
-special: TO ( c|w|d|r "name" -- ) \ core-ext,local
+interpret/compile: TO ( c|w|d|r "name" -- ) \ core-ext,local
 
 : locals|
     \ don't use 'locals|'! use '{'! A portable and free '{'