diff options
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/tactics.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/tactics.ml b/tactics/tactics.ml index 18902c7b35..5f4c73feab 100644 --- a/tactics/tactics.ml +++ b/tactics/tactics.ml @@ -1678,7 +1678,7 @@ let abstract_subproof name tac gls = with UserError _ as e -> (abort_cur_goal(); raise e) end; - exact (applist ((Declare.global env' na), + exact (applist ((Declare.construct_reference env' CCI na), (List.map (fun id -> VAR(id)) (List.rev (ids_of_sign sign))))) gls |