Skip to content
Open
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion bin/kaleidoscope.ml
Original file line number Diff line number Diff line change
Expand Up @@ -4,7 +4,7 @@ let () =
let open Command.Let_syntax in
Command.basic ~summary:"Parse and print kaleidoscope"
[%map_open
let file = flag "file" (optional file) ~doc:"FILE read input from file" in
let file = flag "file" (optional string) ~doc:"FILE read input from file" in
fun () -> Kaleidoscope_lib.Toplevel.main (match file with
| None -> `Stdin
| Some file -> `File file)]
Expand Down
2 changes: 1 addition & 1 deletion lib/dune
Original file line number Diff line number Diff line change
Expand Up @@ -10,7 +10,7 @@
llvm.target
llvm.scalar_opts
menhirLib)
(preprocess (pps ppx_jane ppx_expect ppx_let))
(preprocess (pps ppx_jane -allow-unannotated-ignores ppx_expect ppx_let))
(inline_tests))

(ocamllex lexer)
Expand Down