Code cleanup, version bump to 0.5.1

Author: oco

m3forth.spf

@@ -1,8 +1,8 @@
 \ m3forth
 DECIMAL
 
-C" 0.5" CONSTANT _VERSION
-.( m3forth by Oleg Voronin, David Kuehling. Version )
+C" 0.5.1" CONSTANT _VERSION
+.( m3forth by Oleg Voronin, David Kuehling 2013-2018. Version )
 _VERSION COUNT TYPE CR
 
 S" lib/include/double.f" INCLUDED
@@ -17,7 +17,7 @@ S" lib/include/place.f" INCLUDED
 S" src/hex.spf" INCLUDED
 CREATE FILENAME 255 ALLOT \ temp buffer
 
-\ ================= контроллер
+\ ================= device
 S" devices/devices.spf" INCLUDED \ device types
 FNAME 2@ FILENAME PLACE
 S" .elf" FILENAME +PLACE

src/cross.spf

@@ -1082,16 +1082,5 @@ INTERPRETER
     SWAP 0 REG: +
 ;
 
-\ ~ COMPILER
-\ ~
-\ ~ : BITS{
-  \ ~ ( [ ) 0 TSTATE !H ;
-\ ~
-\ ~ INTERPRETER
-\ ~
-\ ~ : }BITS
-  \ ~ BIT [ ALSO COMPILING ] POSTPONE LITERAL POSTPONE ] ;
-\ ~
-
 HOST
 

src/hex.spf

@@ -22,7 +22,7 @@ VARIABLE H-SUM
   0 0 R> WRITE-LINE THROW
 ;
 
-: HEX-SAVE ( taddr count a u -- ) \ в формате intel.hex
+: HEX-SAVE ( taddr count a u -- ) \ intel.hex
   BASE @ >R HEX
   R/W CREATE-FILE THROW
   -ROT

src/interpreter.spf

@@ -286,7 +286,7 @@ CDATA
    !SP !RP  DECIMAL
    0 STATE !  0 TO SOURCE-ID
    (TIB) 0 SOURCE!
-   CR ." M3Forth (C) Oleg Voronin, David Kuehling 2013"
+   CR ." M3Forth (C) Oleg Voronin, David Kuehling 2013-2018"
    QUIT ;
 ' (ABORT) IS ABORT
 

src/kernel.spf

@@ -290,15 +290,6 @@ COMPILER
     [END-ASM]
 ;
 
-\ symmetric
-\ ~ : /
-    \ ~ [ASM]
-        \ ~ poptmp
-        \ ~ tos tmp tos sdiv
-    \ ~ [END-ASM]
-\ ~ ;
-
-
 : UNLOOP
     [ASM]
         8 # sp sp add