diff options
| author | Peter Sewell | 2017-02-14 21:57:46 +0000 |
|---|---|---|
| committer | Peter Sewell | 2017-02-14 21:57:46 +0000 |
| commit | 83f8e574024df56e75bc1d3f6e6b50ce99ba9042 (patch) | |
| tree | 2afe89d9d7e8842a7d7880f16504519777306e66 /src | |
| parent | 17dcfa99ffb154f5d02684a6a6622558ad779f31 (diff) | |
remove the -i option
Diffstat (limited to 'src')
| -rw-r--r-- | src/sail.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/sail.ml b/src/sail.ml index fe5fcd37..4e76551f 100644 --- a/src/sail.ml +++ b/src/sail.ml @@ -42,7 +42,7 @@ open Process_file -let lib = ref [] +let lib = ref ([] : string list) let opt_file_out : string option ref = ref None let opt_print_version = ref false let opt_print_initial_env = ref false @@ -72,9 +72,11 @@ let options = Arg.align ([ ( "-ocaml_lib", Arg.String (fun l -> opt_libs_ocaml := l::!opt_libs_ocaml), "<filename> provide additional library to open in OCaml output"); +(* ( "-i", Arg.String (fun l -> lib := l::!lib), "<library_filename> treat this file as input only and generate no output for it"); +*) ( "-print_initial_env", Arg.Set opt_print_initial_env, " print the built-in initial type environment and terminate"); |
