fully qualified name: Theory.set_oracle;
authorwenzelm
Wed, 01 Oct 1997 18:19:44 +0200
changeset 3770 294b5905f4eb
parent 3769 931c336b0707
child 3771 ede66fb99880
fully qualified name: Theory.set_oracle;
src/Pure/Thy/thy_parse.ML
--- 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,