diff options
Diffstat (limited to 'tactics/auto.ml')
-rw-r--r-- | tactics/auto.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/auto.ml b/tactics/auto.ml index 46f2d340a..7e8d7678a 100644 --- a/tactics/auto.ml +++ b/tactics/auto.ml @@ -237,7 +237,7 @@ let make_resolve_hyp hname htyp = [make_apply_entry (true, Options.is_verbose()) hname (mkVar hname, htyp)] with | Failure _ -> [] - | UserError _ -> anomaly "Papageno programme comme un blaireau" + | UserError _ -> anomaly "make_resolve_hyp" let add_resolves clist dbnames = List.iter |