changeset 52131 | 366fa32ee2a3 |
parent 49865 | eeaf1ec7eac2 |
child 56231 | b98813774a63 |
--- a/src/Pure/tactical.ML Fri May 24 16:42:57 2013 +0200 +++ b/src/Pure/tactical.ML Fri May 24 17:00:46 2013 +0200 @@ -340,7 +340,7 @@ fun diff st' = Thm.nprems_of st' - d <= 0 (*the subgoal no longer exists*) orelse - not (Pattern.aeconv (t, Thm.term_of (Thm.cprem_of st' (Thm.nprems_of st' - d)))) + not (Envir.aeconv (t, Thm.term_of (Thm.cprem_of st' (Thm.nprems_of st' - d)))) in Seq.filter diff (tac i st) end handle General.Subscript => Seq.empty (*no subgoal i*);