rust-forth-tokenizer 0.2.1

A Forth tokenizer written in Rust.
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52

\ @(#) t_locals.fth 97/01/28 1.1
\ Test PForth LOCAL variables.
\
\ Copyright 1996 3DO, Phil Burk

include? }T{  t_tools.fth

anew task-t_locals.fth
decimal

test{

\ test value and locals
T{ 333 value  my-value   my-value }T{  333 }T
T{ 1000 -> my-value   my-value }T{ 1000 }T
T{ 35 +-> my-value   my-value }T{ 1035 }T
: test.value  ( -- ok )
    100 -> my-value
    my-value 100 =
    47 +-> my-value
    my-value 147 = AND
;
T{ test.value }T{ TRUE }T

\ test locals in a word
: test.locs  { aa bb | cc -- ok }
    cc 0=
    aa bb + -> cc
    aa bb +   cc = AND
    aa -> cc
    bb +->  cc
    aa bb +   cc = AND
;

T{ 200 59 test.locs }T{  TRUE }T

.( Test warning when no locals defined.) cr
: loc.nonames { -- } 1234 ;
T{ loc.nonames }T{ 1234 }T

\ try to put EOLs and comments in variable list
: calc.area {
    width    \ horizontal dimension
    height   \ vertical dimension
    -- area , calculate area of a rectangle }
    width height *
;

T{ 5 20 calc.area }T{ 100 }T

}test