diff options
author | Chimrod <> | 2023-09-29 12:00:26 +0200 |
---|---|---|
committer | Chimrod <> | 2023-09-29 12:00:26 +0200 |
commit | 7d1630227e3a0f35f3aa2c688474a742f23fdd05 (patch) | |
tree | 5c9dc80f49f7cbedb93e72e64fa2c0fc313dd548 | |
parent | 7296d72aaec9186cd0d0f2c46b226a38059dc3eb (diff) |
Forgot that windows requires files to open in binary mode
-rw-r--r-- | bin/qsp_parser.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/bin/qsp_parser.ml b/bin/qsp_parser.ml index 3980ad5..8ce4d4c 100644 --- a/bin/qsp_parser.ml +++ b/bin/qsp_parser.ml @@ -72,7 +72,7 @@ let () = let file_names, filters = Args.parse () in let file_name = List.hd file_names in - let ic = Stdlib.open_in file_name in + let ic = Stdlib.open_in_bin file_name in (*let lexer = Lexing.from_channel ~with_positions:true ic in*) let lexer = |