# HG changeset patch
# User wenzelm
# Date 933343140 -7200
# Node ID 2c02c8e212fa9c7d86b7c0d03ba9bf21ca56ab55
# Parent  1af4c1f48368e71de1ee34ca1de6c61c5f54b421
oracle: '=';

diff -r 1af4c1f48368 -r 2c02c8e212fa src/Pure/Isar/isar_syn.ML
--- a/src/Pure/Isar/isar_syn.ML	Fri Jul 30 15:57:50 1999 +0200
+++ b/src/Pure/Isar/isar_syn.ML	Fri Jul 30 15:59:00 1999 +0200
@@ -233,7 +233,7 @@
 
 val oracleP =
   OuterSyntax.command "oracle" "install oracle" K.thy_decl
-    (P.name -- P.text -- P.marg_comment >> (Toplevel.theory o IsarThy.add_oracle));
+    ((P.name --| P.$$$ "=") -- P.text -- P.marg_comment >> (Toplevel.theory o IsarThy.add_oracle));