aboutsummaryrefslogtreecommitdiff
path: root/interp/topconstr.ml
diff options
context:
space:
mode:
Diffstat (limited to 'interp/topconstr.ml')
-rw-r--r--interp/topconstr.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/topconstr.ml b/interp/topconstr.ml
index 0f894019b0..eb564f3b32 100644
--- a/interp/topconstr.ml
+++ b/interp/topconstr.ml
@@ -32,7 +32,7 @@ let _ = Goptions.declare_bool_option {
(**********************************************************************)
(* Miscellaneous *)
-let error_invalid_pattern_notation ?loc =
+let error_invalid_pattern_notation ?loc () =
user_err ?loc (str "Invalid notation for pattern.")
(**********************************************************************)