src/Provers/blast.ML
changeset 30513 1796b8ea88aa
parent 30320 5f859035331f
child 30541 9f168bdc468a
--- a/src/Provers/blast.ML	Fri Mar 13 21:24:21 2009 +0100
+++ b/src/Provers/blast.ML	Fri Mar 13 21:25:15 2009 +0100
@@ -56,7 +56,7 @@
                  uwrappers: (string * wrapper) list,
                  safe0_netpair: netpair, safep_netpair: netpair,
                  haz_netpair: netpair, dup_netpair: netpair, xtra_netpair: ContextRules.netpair}
-  val cla_modifiers: (Args.T list -> (Method.modifier * Args.T list)) list
+  val cla_modifiers: Method.modifier parser list
   val cla_meth': (claset -> int -> tactic) -> thm list -> Proof.context -> Proof.method
   end;