src/HOL/Tools/Nitpick/nitpick_isar.ML
changeset 42361 23f352990944
parent 41993 bd6296de1432
child 42959 ee829022381d
--- a/src/HOL/Tools/Nitpick/nitpick_isar.ML	Sat Apr 16 15:47:52 2011 +0200
+++ b/src/HOL/Tools/Nitpick/nitpick_isar.ML	Sat Apr 16 16:15:37 2011 +0200
@@ -303,7 +303,7 @@
   end
 
 fun default_params thy =
-  extract_params (ProofContext.init_global thy) false (default_raw_params thy)
+  extract_params (Proof_Context.init_global thy) false (default_raw_params thy)
   o map (apsnd single)
 
 val parse_key = Scan.repeat1 Parse.typ_group >> space_implode " "