src/Pure/sign.ML
changeset 34259 2ba492b8b6e8
parent 34245 25bd3ed2ac9f
child 35129 ed24ba6f69aa
--- a/src/Pure/sign.ML	Mon Jan 04 22:43:07 2010 +0100
+++ b/src/Pure/sign.ML	Mon Jan 04 23:20:35 2010 +0100
@@ -148,7 +148,7 @@
 fun make_sign (naming, syn, tsig, consts) =
   Sign {naming = naming, syn = syn, tsig = tsig, consts = consts};
 
-structure SignData = TheoryDataFun
+structure SignData = Theory_Data_PP
 (
   type T = sign;
   fun extend (Sign {syn, tsig, consts, ...}) =