aboutsummaryrefslogtreecommitdiffhomepage
path: root/lib/cWarnings.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/cWarnings.ml')
-rw-r--r--lib/cWarnings.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/cWarnings.ml b/lib/cWarnings.ml
index 68442bd7c..7b8dc2b9b 100644
--- a/lib/cWarnings.ml
+++ b/lib/cWarnings.ml
@@ -45,7 +45,7 @@ let create ~name ~category ?(default=Enabled) pp =
| Disabled -> ()
| AsError ->
let loc = Option.default !current_loc loc in
- Errors.user_err_loc (loc,"_",pp x)
+ CErrors.user_err_loc (loc,"_",pp x)
| Enabled ->
let msg =
pp x ++ str " [" ++ str name ++ str "," ++
@@ -80,7 +80,7 @@ let parse_flag s =
| '+' -> (AsError, String.sub s 1 (String.length s - 1))
| '-' -> (Disabled, String.sub s 1 (String.length s - 1))
| _ -> (Enabled, s)
- else Errors.error "Invalid warnings flag"
+ else CErrors.error "Invalid warnings flag"
let rec do_all_keyword = function
| [] -> []