6 lines
154 B
OCaml
6 lines
154 B
OCaml
|
|
||
|
|
let test_lex =
|
||
|
|
let open Token in
|
||
|
|
let t = Lex.tokenize "10 + 20 30/40" |> List.of_seq in
|
||
|
|
assert (t = [Int 10; Plus; Int 20; Int 30; Slash; Int 40])
|