mirror of
https://github.com/kanaka/mal.git
synced 2024-10-26 22:28:26 +03:00
8a19f60386
- Reorder README to have implementation list after "learning tool" bullet. - This also moves tests/ and libs/ into impls. It would be preferrable to have these directories at the top level. However, this causes difficulties with the wasm implementations which need pre-open directories and have trouble with paths starting with "../../". So in lieu of that, symlink those directories to the top-level. - Move the run_argv_test.sh script into the tests directory for general hygiene.
16 lines
354 B
OCaml
16 lines
354 B
OCaml
let read str = Reader.read_str str
|
|
let eval ast any = ast
|
|
let print exp = Printer.pr_str exp true
|
|
let rep str = print (eval (read str) "")
|
|
|
|
let rec main =
|
|
try
|
|
while true do
|
|
print_string "user> ";
|
|
let line = read_line () in
|
|
try
|
|
print_endline (rep line);
|
|
with End_of_file -> ()
|
|
done
|
|
with End_of_file -> ()
|