aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2003-10-16 15:09:41 +0000
committerGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2003-10-16 15:09:41 +0000
commitd2a8c03e02b02c67a7c7b149fa0559e0f3e37351 (patch)
treebe644d5c3b100d3fed0cdf8fcf7f79485923c98d
parent50f832729dd03e7395e39a7ae2bd9cd1455c006e (diff)
Message d'erreur
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4652 85f007b7-540e-0410-9357-904b9bb8a0f7
-rw-r--r--interp/symbols.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/symbols.ml b/interp/symbols.ml
index d1d2d0c84..148b65fd1 100644
--- a/interp/symbols.ml
+++ b/interp/symbols.ml
@@ -289,7 +289,7 @@ let rec interp_notation ntn scopes =
if pp8only then raise Not_found;
pat in
try find_interpretation f (List.fold_right push_scope scopes !scope_stack)
- with Not_found -> error ("Unknown interpretation for notation "^ntn)
+ with Not_found -> error ("Unknown interpretation for notation \""^ntn^"\"")
let uninterp_notations c =
Gmapl.find (rawconstr_key c) !notations_key_table