Made record parameter flexible to allow for extensions

--- a/src/HOL/Mirabelle/Tools/mirabelle_metis.ML	Thu Sep 10 16:16:18 2009 +0200
+++ b/src/HOL/Mirabelle/Tools/mirabelle_metis.ML	Fri Sep 11 09:52:40 2009 +0200
@@ -10,7 +10,7 @@
 fun init _ = I
 fun done _ _ = ()
 
-fun run id {pre, post, timeout, log} =
+fun run id {pre, post, timeout, log, ...} =
   let
     val thms = Mirabelle.theorems_of_sucessful_proof post
     val names = map Thm.get_name thms