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