diff options
author | 2017-04-11 13:05:54 -0400 | |
---|---|---|
committer | 2017-04-25 15:13:25 -0400 | |
commit | e4262a89d7bc3d9b985d9a4a939f34176581abcb (patch) | |
tree | 03e7b61ba7162e674b5fef046705d6d8cfcdd08d /tactics | |
parent | 1e046726dc9352f7979ebdeba0d750e44016fea5 (diff) |
transparent abstract: Respond to review comment
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 d02fe8665..465481703 100644 --- a/tactics/tactics.ml +++ b/tactics/tactics.ml @@ -5008,7 +5008,7 @@ let tclABSTRACT ?(opaque=true) name_op tac = let s, gk = if opaque then name_op_to_name name_op (Proof Theorem) "_subproof" else name_op_to_name name_op (DefinitionBody Definition) "_subterm" in - abstract_subproof ~opaque:opaque s gk tac + abstract_subproof ~opaque s gk tac let unify ?(state=full_transparent_state) x y = Proofview.Goal.s_enter { s_enter = begin fun gl -> |