--- gforth/glocals.fs	1996/02/09 17:34:10	1.19
+++ gforth/glocals.fs	1996/05/03 13:05:05	1.20
@@ -505,7 +505,6 @@ forth definitions
     then ;
 
 : TO ( c|w|d|r "name" -- ) \ core-ext,local
-\ !! state smart
  0 0 0. 0.0e0 { c: clocal w: wlocal d: dlocal f: flocal }
  ' dup >definer
  state @