diff options
Diffstat (limited to 'utils')
| -rw-r--r-- | utils/clflags.ml | 1 | ||||
| -rw-r--r-- | utils/clflags.mli | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/utils/clflags.ml b/utils/clflags.ml index 42ec3405b..30644c2ae 100644 --- a/utils/clflags.ml +++ b/utils/clflags.ml @@ -55,6 +55,7 @@ and dllpaths = ref ([] : string list) (* -dllpath *) and make_package = ref false (* -pack *) and for_package = ref (None: string option) (* -for-pack *) and error_size = ref 500 (* -error-size *) +let dump_source = ref false (* -dsource *) let dump_parsetree = ref false (* -dparsetree *) and dump_rawlambda = ref false (* -drawlambda *) and dump_lambda = ref false (* -dlambda *) diff --git a/utils/clflags.mli b/utils/clflags.mli index 1560964b3..5164197b0 100644 --- a/utils/clflags.mli +++ b/utils/clflags.mli @@ -52,6 +52,7 @@ val dllpaths : string list ref val make_package : bool ref val for_package : string option ref val error_size : int ref +val dump_source : bool ref val dump_parsetree : bool ref val dump_rawlambda : bool ref val dump_lambda : bool ref |