aboutsummaryrefslogtreecommitdiff
path: root/toplevel/vernacinterp.ml
diff options
context:
space:
mode:
Diffstat (limited to 'toplevel/vernacinterp.ml')
-rw-r--r--toplevel/vernacinterp.ml6
1 files changed, 3 insertions, 3 deletions
diff --git a/toplevel/vernacinterp.ml b/toplevel/vernacinterp.ml
index fdfa514278..9c5db8fd95 100644
--- a/toplevel/vernacinterp.ml
+++ b/toplevel/vernacinterp.ml
@@ -54,8 +54,8 @@ let call (opn,converted_args) =
hunk()
with
| Drop -> raise Drop
- | e ->
- let e = Errors.push e in
+ | reraise ->
+ let reraise = Errors.push reraise in
if !Flags.debug then
msg_debug (str"Vernac Interpreter " ++ str !loc);
- raise e
+ raise reraise