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 0f7187d8a..ccf75b00e 100644 --- a/utils/clflags.ml +++ b/utils/clflags.ml @@ -53,6 +53,7 @@ and no_auto_link = ref false (* -noautolink *) 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_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 7bbd32694..b08901715 100644 --- a/utils/clflags.mli +++ b/utils/clflags.mli @@ -50,6 +50,7 @@ val no_auto_link : bool ref val dllpaths : string list ref val make_package : bool ref val for_package : string option ref +val error_size : int ref val dump_parsetree : bool ref val dump_rawlambda : bool ref val dump_lambda : bool ref |