src/Pure/Isar/element.ML
changeset 74509 f24ade4ff3cc
parent 74282 c2ee8d993d6a
child 77808 b43ee37926a9
--- a/src/Pure/Isar/element.ML	Wed Oct 13 11:04:35 2021 +0200
+++ b/src/Pure/Isar/element.ML	Wed Oct 13 13:19:09 2021 +0200
@@ -390,7 +390,7 @@
         fun decomp_simp prop =
           let
             val ctxt = Proof_Context.init_global thy;
-            val _ = Logic.count_prems prop = 0 orelse
+            val _ = Logic.no_prems prop orelse
               error ("Bad conditional rewrite rule " ^ Syntax.string_of_term ctxt prop);
             val lhsrhs = Logic.dest_equals prop
               handle TERM _ => error ("Rewrite rule not a meta-equality " ^ Syntax.string_of_term ctxt prop);