Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

newline after position (easier to parse) 

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@2869 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Jacques Garrigue 2000-02-26 13:29:31 +00:00
parent ec45b88a4a
commit ef938a7878
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
parsing/location.ml
View File

@ -104,7 +104,7 @@ let (msg_file, msg_line, msg_chars, msg_to, msg_colon, msg_head) =
let print loc =
if String.length !input_name = 0 then
if highlight_locations loc none then () else
printf "Characters %i-%i:@?" loc.loc_start loc.loc_end
printf "Characters %i-%i:@." loc.loc_start loc.loc_end
else begin
let (filename, linenum, linebeg) =
Linenum.for_position !input_name loc.loc_start in