diff options
author | 2002-11-28 23:03:22 +0000 | |
---|---|---|
committer | 2002-11-28 23:03:22 +0000 | |
commit | 9b32244199542142502b0ced52a0290eeb411ddb (patch) | |
tree | acbf46950431a538f244fa693d6e568b6da6ac44 | |
parent | e641aeeef1cde745561593b7ef9edb0112712cbf (diff) |
Bug exception
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3330 85f007b7-540e-0410-9357-904b9bb8a0f7
-rw-r--r-- | interp/symbols.ml | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/interp/symbols.ml b/interp/symbols.ml index 0d949fb28..3704decd4 100644 --- a/interp/symbols.ml +++ b/interp/symbols.ml @@ -174,12 +174,9 @@ let check_required_module loc sc d = ^(list_last d))) let lookup_numeral_interpreter loc sc = - try - let (dir,interpreter) = Hashtbl.find numeral_interpreter_tab sc in - check_required_module loc sc dir; - interpreter - with Not_found -> - error ("No interpretation for numerals in scope "^sc) + let (dir,interpreter) = Hashtbl.find numeral_interpreter_tab sc in + check_required_module loc sc dir; + interpreter (* Look if some notation or numeral printer in [scope] can be used in the scope stack [scopes], and if yes, using delimiters or not *) |