changeset 33141 | 89b23fad5e02 |
parent 33140 | 83951822bfd0 |
child 33149 | 2c8f1c450b47 |
--- a/src/HOL/Tools/Predicate_Compile/pred_compile_data.ML Sat Oct 24 16:55:42 2009 +0200 +++ b/src/HOL/Tools/Predicate_Compile/pred_compile_data.ML Sat Oct 24 16:55:42 2009 +0200 @@ -155,7 +155,7 @@ |> store [] Predicate_Compile_Alternative_Defs.get val ignore_consts = Symtab.keys table in - table + table |> store ignore_consts Predicate_Compile_Preproc_Const_Defs.get |> store ignore_consts Nitpick_Const_Simps.get |> store ignore_consts Nitpick_Ind_Intros.get