summaryrefslogtreecommitdiff
path: root/src/process_file.ml
diff options
context:
space:
mode:
authorKathy Gray2013-07-26 13:00:56 +0100
committerKathy Gray2013-07-26 13:00:56 +0100
commit37a4c2ebcfab7834c17fe44703a71da277cb285e (patch)
tree366ec0c11ec8a86009aff7986862df046ca0f202 /src/process_file.ml
parentf79e3c770ab7b772edf0cd54993c059c4d7b969a (diff)
Remove white space/terminal tracking
Diffstat (limited to 'src/process_file.ml')
-rw-r--r--src/process_file.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/process_file.ml b/src/process_file.ml
index 850a80f2..a674c66f 100644
--- a/src/process_file.ml
+++ b/src/process_file.ml
@@ -56,9 +56,9 @@ let get_lexbuf fn =
Lexing.pos_cnum = 0; };
lexbuf
-let parse_file (f : string) : (Parse_ast.defs * Parse_ast.lex_skips) =
+let parse_file (f : string) : Parse_ast.defs =
let lexbuf = get_lexbuf f in
- Parser.file (Lexer.token []) lexbuf
+ Parser.file Lexer.token lexbuf
(* try
Parser.file (Lexer.token []) lexbuf
with