Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

List and Array Comprehensions #147

Merged
merged 17 commits into from
Nov 12, 2021
Prev Previous commit
Rename -extensions to -extension
  • Loading branch information
stedolan committed Nov 12, 2021
commit 3f3a3aa7280e18112c4d80d50dc03baa7a9599e4
14 changes: 7 additions & 7 deletions ocaml/driver/main_args.ml
Original file line number Diff line number Diff line change
Expand Up @@ -719,8 +719,8 @@ let mk_dump_into_file f =
"-dump-into-file", Arg.Unit f, " dump output like -dlambda into <target>.dump"
;;

let mk_extensions f =
"-extensions", Arg.String f, "<extension> Enable the extension"
let mk_extension f =
"-extension", Arg.String f, "<extension> Enable the extension"
;;

let mk_standard f =
Expand Down Expand Up @@ -1312,7 +1312,7 @@ module type Core_options = sig
val _dtypedtree : unit -> unit
val _drawlambda : unit -> unit
val _dlambda : unit -> unit
val _extensions : string -> unit
val _extension : string -> unit

end

Expand Down Expand Up @@ -1671,7 +1671,7 @@ struct
mk_dprofile F._dprofile;
mk_standard F._standard;
mk_dump_into_file F._dump_into_file;
mk_extensions F._extensions;
mk_extension F._extension;

mk_args F._args;
mk_args0 F._args0;
Expand Down Expand Up @@ -1735,7 +1735,7 @@ struct
mk_drawlambda F._drawlambda;
mk_dlambda F._dlambda;
mk_dinstr F._dinstr;
mk_extensions F._extensions;
mk_extension F._extension;

mk_args F._args;
mk_args0 F._args0;
Expand Down Expand Up @@ -1975,7 +1975,7 @@ struct
mk_standard F._standard;
mk_dump_into_file F._dump_into_file;
mk_dump_pass F._dump_pass;
mk_extensions F._extensions;
mk_extension F._extension;

mk_args F._args;
mk_args0 F._args0;
Expand Down Expand Up @@ -2309,7 +2309,7 @@ module Default = struct
let _unsafe = set unsafe
let _warn_error s = Warnings.parse_options true s
let _warn_help = Warnings.help_warnings
let _extensions s = add_extension s
let _extension s = add_extension s
end

module Native = struct
Expand Down
2 changes: 1 addition & 1 deletion ocaml/driver/main_args.mli
Original file line number Diff line number Diff line change
Expand Up @@ -67,7 +67,7 @@ module type Core_options = sig
val _dtypedtree : unit -> unit
val _drawlambda : unit -> unit
val _dlambda : unit -> unit
val _extensions : string -> unit
val _extension : string -> unit

end

Expand Down
2 changes: 1 addition & 1 deletion ocaml/testsuite/tests/comprehensions/comprehensions.ml
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
(* TEST
flags = "-extensions Comprehensions"
flags = "-extension Comprehensions"
* expect
*)
(*Type checking tests.*)
Expand Down