diff options
author | Alex AUVOLAT <alex.auvolat@ens.fr> | 2013-10-31 15:35:11 +0100 |
---|---|---|
committer | Alex AUVOLAT <alex.auvolat@ens.fr> | 2013-10-31 15:35:11 +0100 |
commit | 0b269f32dd9b8d349f94793dad44e728473e9f0a (patch) | |
tree | 066a30fee1efe19d897f5e153d7ea9aa3d7448af /minijazz/src/main/cli_options.ml | |
download | SystDigit-Projet-0b269f32dd9b8d349f94793dad44e728473e9f0a.tar.gz SystDigit-Projet-0b269f32dd9b8d349f94793dad44e728473e9f0a.zip |
First commit ; includes first TP and minijazz compiler
Diffstat (limited to 'minijazz/src/main/cli_options.ml')
-rw-r--r-- | minijazz/src/main/cli_options.ml | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/minijazz/src/main/cli_options.ml b/minijazz/src/main/cli_options.ml new file mode 100644 index 0000000..c5820a8 --- /dev/null +++ b/minijazz/src/main/cli_options.ml @@ -0,0 +1,18 @@ +(* version of the compiler *) +let version = "0.2.1" + +let verbose = ref false +let print_types = ref false +let no_inline_all = ref false +let main_node = ref "main" + +let base_path = ref "" + +let show_version () = + Format.printf "The MiniJazz compiler, version %s @." version +let errmsg = "Options are:" + +let doc_verbose = "\t\t\tSet verbose mode" +and doc_version = "\t\tThe version of the compiler" +and doc_full_type_info = "\t\tPrint full type information" +and doc_main_node = "\t\t\tSet the main node" |