src/Pure/Thy/thy_parse.ML
changeset 3770 294b5905f4eb
parent 3764 fe7719aee219
child 3780 ac23a9ab3cd6
--- a/src/Pure/Thy/thy_parse.ML	Wed Oct 01 18:19:18 1997 +0200
+++ b/src/Pure/Thy/thy_parse.ML	Wed Oct 01 18:19:44 1997 +0200
@@ -533,7 +533,7 @@
   "+", ",", "<", "{", "}", "(", ")", "[", "]", "::", "==", "=>", "<="];
 
 val pure_sections =
- [section "oracle" "|> set_oracle" (name >> strip_quotes),
+ [section "oracle" "|> Theory.set_oracle" (name >> strip_quotes),
   section "classes" "|> Theory.add_classes" class_decls,
   section "default" "|> Theory.add_defsort" sort,
   section "types" "" type_decls,