replaced thy_data by thy_setup;
authorwenzelm
Sat, 04 Apr 1998 11:41:24 +0200
changeset 4787 90fc96d16df4
parent 4786 9b6072bd71e4
child 4788 b54c337f2c7f
replaced thy_data by thy_setup;
src/Pure/Thy/thy_parse.ML
--- a/src/Pure/Thy/thy_parse.ML	Sat Apr 04 11:41:00 1998 +0200
+++ b/src/Pure/Thy/thy_parse.ML	Sat Apr 04 11:41:24 1998 +0200
@@ -345,7 +345,7 @@
   \ val typed_print_translation = [];\n\
   \ val print_ast_translation = [];\n\
   \ val token_translation = [];\n\
-  \ val thy_data = []";
+  \ val thy_setup = []";
 
 val trfun_args =
   "(parse_ast_translation, parse_translation, \
@@ -503,11 +503,11 @@
     \\n"
     ^ local_path ^
     "\n\
+    \|> Theory.setup thy_setup\n\
     \|> Theory.add_trfuns\n"
     ^ trfun_args ^ "\n\
     \|> Theory.add_trfunsT typed_print_translation\n\
     \|> Theory.add_tokentrfuns token_translation\n\
-    \|> Theory.init_data thy_data\n\
     \\n"
     ^ extxt ^ "\n\
     \\n\