diff -r c7069b09730b -r 9f6c606d5b59 Quot/quotient_tacs.ML --- a/Quot/quotient_tacs.ML Wed Feb 10 10:55:14 2010 +0100 +++ b/Quot/quotient_tacs.ML Wed Feb 10 11:09:30 2010 +0100 @@ -29,7 +29,7 @@ (* Since HOL_basic_ss is too "big" for us, we *) (* need to set up our own minimal simpset. *) -fun mk_minimal_ss ctxt = +fun mk_minimal_ss ctxt = Simplifier.context ctxt empty_ss setsubgoaler asm_simp_tac setmksimps (mksimps [])