diff options
author | 2012-04-18 14:47:36 +0000 | |
---|---|---|
committer | 2012-04-18 14:47:36 +0000 | |
commit | 8a6104fd0a7439652e2a6f35aca5c83d59070c5b (patch) | |
tree | 42d0088ce2a61058ca4d3bb818ce2cee047cdc19 /tactics/tacinterp.ml | |
parent | 060c10020b7fce5d47de7a882cff335779c6888e (diff) |
Better error message in tactic notations.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15203 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics/tacinterp.ml')
-rw-r--r-- | tactics/tacinterp.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/tacinterp.ml b/tactics/tacinterp.ml index b55a9f01f..b03923bcc 100644 --- a/tactics/tacinterp.ml +++ b/tactics/tacinterp.ml @@ -2466,7 +2466,7 @@ and interp_atomic ist gl tac = | ExtraArgType _ | BindingsArgType | OptArgType _ | PairArgType _ | List0ArgType _ | List1ArgType _ - -> error "This generic type is not supported in alias." + -> error "This argument type is not supported in tactic notations." in let lfun = (List.map (fun (x,c) -> (x,f c)) l)@ist.lfun in |