--- a/src/Pure/ML/ml_thms.ML Fri Aug 22 12:05:47 2014 +0200 +++ b/src/Pure/ML/ml_thms.ML Fri Aug 22 15:39:30 2014 +0200 @@ -37,7 +37,6 @@ val cons_thms = Data.map o apsnd o cons; - (* attribute source *) val _ = Theory.setup