src/FOL/simpdata.ML
changeset 35232 f588e1169c8b
parent 35021 c839a4c670c6
child 36543 0e7fc5bf38de
--- a/src/FOL/simpdata.ML	Fri Feb 19 11:56:11 2010 +0100
+++ b/src/FOL/simpdata.ML	Fri Feb 19 16:11:45 2010 +0100
@@ -128,7 +128,7 @@
 
 (*No simprules, but basic infastructure for simplification*)
 val FOL_basic_ss =
-  Simplifier.theory_context @{theory} empty_ss
+  Simplifier.global_context @{theory} empty_ss
   setsubgoaler asm_simp_tac
   setSSolver (mk_solver "FOL safe" safe_solver)
   setSolver (mk_solver "FOL unsafe" unsafe_solver)