diff options
| -rw-r--r-- | bin/qsp_parser.ml | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/bin/qsp_parser.ml b/bin/qsp_parser.ml index 8ce4d4c..ffb1bd5 100644 --- a/bin/qsp_parser.ml +++ b/bin/qsp_parser.ml @@ -59,9 +59,6 @@ let parse_location : Sedlexing.lexbuf -> filters -> unit = let start_position, _ = Sedlexing.lexing_positions lexbuf in Format.fprintf Format.std_formatter "Location %s@;@[%a@]@." start_position.Lexing.pos_fname pp_result report; - let () = - match Sys.os_type with "Win32" -> ignore @@ read_line () | _ -> () - in ()) | Error e -> let start_position, _ = Sedlexing.lexing_positions lexbuf in |