dictionary.txt

@@ -98,8 +98,6 @@ C!          c a --          Store byte c in address a
 CURRENT     -- a            Set a to wordref of last added entry.
 HERE        -- a            Push HERE's address
 H@          -- a            HERE @
-MOVE        a1 a2 u --      Copy u bytes from a1 to a2, starting with a1, going
-                            up.
 
 *** Arithmetic / Bits ***
 

forth/core.fs

@@ -118,12 +118,3 @@
 ( Set up initial SYSVNXT value, which is 2 bytes after its
   own address )
 46 RAM+ DUP 2 + SWAP !
-
-( a1 a2 u -- )
-: MOVE
-    ( u ) 0 DO
-        SWAP DUP I + @    ( a2 a1 x )
-        ROT SWAP OVER I + ( a1 a2 x a2 )
-        !                 ( a1 a2 )
-    LOOP
-;

forth/fmt.fs

@@ -69,7 +69,7 @@
 : DUMP
     LF
     BEGIN
-        OVER 1 < IF 2DROP EXIT THEN
+        OVER 1 < IF DROP EXIT THEN
         _
         SWAP 8 - SWAP
     AGAIN

tests/forth/test_cmp.fs

@@ -1,4 +0,0 @@
-0x70 <>{ 0x70 &= 0x58 |= 0x20 |= <>} #
-0x71 <>{ 0x70 &= 0x58 |= 0x20 |= <>} NOT #
-0x42 <>{ 0x40 &> 0x44 &< <>} #
-0x44 <>{ 0x40 &> 0x44 &< <>} NOT #