General style changes, nothing major
This commit is contained in:
@@ -3,6 +3,7 @@ open Printf;;
|
||||
open Lisp;;
|
||||
open Eval;;
|
||||
open Read;;
|
||||
|
||||
let rec repl env c =
|
||||
let () = printf ">>> "; Out_channel.flush Out_channel.stdout; in
|
||||
match In_channel.input_line c with
|
||||
@@ -14,4 +15,5 @@ let rec repl env c =
|
||||
Out_channel.flush Out_channel.stdout;
|
||||
repl env c;;
|
||||
|
||||
|
||||
let _ = repl (make_env ()) (In_channel.stdin)
|
4
lib/dune
4
lib/dune
@@ -1,7 +1,5 @@
|
||||
(library
|
||||
(name lisp)
|
||||
;(modules ast read lexer parser)
|
||||
)
|
||||
(name lisp))
|
||||
|
||||
(include_subdirs unqualified)
|
||||
|
||||
|
@@ -33,4 +33,3 @@ rule read =
|
||||
| '\'' { QUOTE }
|
||||
| _ { raise (SyntaxError ("Unexpected char: " ^ Lexing.lexeme lexbuf))}
|
||||
| eof { EOF }
|
||||
|
||||
|
Reference in New Issue
Block a user