Skip to content

Commit

Permalink
Improve test output
Browse files Browse the repository at this point in the history
- Comment out line number debug statements
- Add new line after "(Not given a file to compile"
  • Loading branch information
TMVector committed Jun 16, 2016
1 parent 3c7f87e commit b1bec94
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 2 deletions.
2 changes: 1 addition & 1 deletion motto.ml
Original file line number Diff line number Diff line change
Expand Up @@ -326,4 +326,4 @@ match !cfg.source_file with
if !cfg.parser_test_files <> [] || !cfg.parser_test_dirs <> [] then
Crisp_test.run_parser_test !cfg.parser_test_dirs !cfg.parser_test_files;
if !cfg.output_location <> No_output then
Printf.printf "(Not given a file to compile)"
Printf.printf "(Not given a file to compile)\n"
2 changes: 1 addition & 1 deletion syntax/crisp_lexer.mll
Original file line number Diff line number Diff line change
Expand Up @@ -30,7 +30,7 @@ let next_line ?(nl_count=1) ?nl_str lexbuf =
| None -> nl_count
| Some str -> count_nl str in
let pos = lexbuf.lex_curr_p in
(*DEBUG*) Printf.printf ">>DEBUG>> next_line %d @ %d (line %d, bol %d, sp %d)\n" nl_count lexbuf.lex_curr_pos pos.pos_lnum lexbuf.lex_curr_p.pos_bol lexbuf.lex_start_pos;
(* (*DEBUG*) Printf.printf ">>DEBUG>> next_line %d @ %d (line %d, bol %d, sp %d)\n" nl_count lexbuf.lex_curr_pos pos.pos_lnum lexbuf.lex_curr_p.pos_bol lexbuf.lex_start_pos;*)
lexbuf.lex_curr_p <-
{
(* The position of the first token on the line, even if NL *)
Expand Down

0 comments on commit b1bec94

Please sign in to comment.