# HG changeset patch # User haftmann # Date 1398929433 -7200 # Node ID d4a790cb47e8f7c2f7fbec4ee5dad68c89834c8c # Parent ab36ec0c8eb5aadb06f068bb5098d1b0fea31c43 cleanup diff -r ab36ec0c8eb5 -r d4a790cb47e8 src/Tools/Code/code_simp.ML --- a/src/Tools/Code/code_simp.ML Thu May 01 09:30:32 2014 +0200 +++ b/src/Tools/Code/code_simp.ML Thu May 01 09:30:33 2014 +0200 @@ -33,10 +33,6 @@ fun simpset_default ctxt some_ss = the_default (Simpset.get (Proof_Context.theory_of ctxt)) some_ss; -(*fun simp_ctxt_default ctxt some_ss = - Proof_Context.init_global ctxt - |> put_simpset (simpset_default ctxt some_ss);*) - (* diagnostic *)