Commit ac0e1b00 authored by POTTIER Francois's avatar POTTIER Francois

Indentation.

parent 3ea369b3
......@@ -45,7 +45,7 @@ let process (line : string) =
| Lexer.Error msg ->
Printf.fprintf stderr "%s%!" msg
| E.Error ((startp, _), explanations) ->
print_explanations startp explanations
print_explanations startp explanations
let process (optional_line : string option) =
match optional_line with
......@@ -60,7 +60,6 @@ let rec repeat channel =
process optional_line;
if continue then
repeat channel
let () =
repeat (from_channel stdin)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment