Project

General

Profile

« Previous | Next » 

Revision 57c96fb7

Added by LĂ©lio Brun 11 months ago

setup tests for dune

View differences:

src/utils/location.ml
90 90
  let (start_char, end_char) =
91 91
    if start_char < 0 then (0,1) else (start_char, end_char)
92 92
  in
93
  Format.fprintf fmt "File \"%s\", line %i, characters %i-%i:" filename line start_char end_char;
93
  Format.fprintf fmt "File \"%s\", line %i, characters %i-%i"
94
    filename line start_char end_char;
94 95
  (* Format.fprintf fmt "@.loc1=(%i,%i,%i) loc2=(%i,%i,%i)@."
95 96
   *   loc.loc_start.Lexing.pos_lnum
96 97
   *   loc.loc_start.Lexing.pos_bol

Also available in: Unified diff