diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-10-16 15:09:41 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-10-16 15:09:41 +0000 |
commit | d2a8c03e02b02c67a7c7b149fa0559e0f3e37351 (patch) | |
tree | be644d5c3b100d3fed0cdf8fcf7f79485923c98d | |
parent | 50f832729dd03e7395e39a7ae2bd9cd1455c006e (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.ml | 2 |
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 |