liberal name as in document antiquotations;
authorwenzelm
Fri, 12 Aug 2016 11:54:36 +0200
changeset 63671 eb4f59275c05
parent 63670 8e0148e1f5f4
child 63672 5a7c919a4ada
liberal name as in document antiquotations;
src/Doc/Implementation/Integration.thy
src/HOL/Tools/Quickcheck/narrowing_generators.ML
src/Pure/ML/ml_context.ML
--- a/src/Doc/Implementation/Integration.thy	Fri Aug 12 11:53:47 2016 +0200
+++ b/src/Doc/Implementation/Integration.thy	Fri Aug 12 11:54:36 2016 +0200
@@ -132,7 +132,7 @@
 \<close>
 
 text %mlex \<open>
-  The file @{"file" "~~/src/HOL/ex/Commands.thy"} shows some example Isar
+  The file @{file "~~/src/HOL/ex/Commands.thy"} shows some example Isar
   command definitions, with the all-important theory header declarations for
   outer syntax keywords.
 \<close>
--- a/src/HOL/Tools/Quickcheck/narrowing_generators.ML	Fri Aug 12 11:53:47 2016 +0200
+++ b/src/HOL/Tools/Quickcheck/narrowing_generators.ML	Fri Aug 12 11:54:36 2016 +0200
@@ -199,10 +199,10 @@
 (** invocation of Haskell interpreter **)
 
 val narrowing_engine =
-  File.read @{"file" "~~/src/HOL/Tools/Quickcheck/Narrowing_Engine.hs"}
+  File.read @{file "~~/src/HOL/Tools/Quickcheck/Narrowing_Engine.hs"}
 
 val pnf_narrowing_engine =
-  File.read @{"file" "~~/src/HOL/Tools/Quickcheck/PNF_Narrowing_Engine.hs"}
+  File.read @{file "~~/src/HOL/Tools/Quickcheck/PNF_Narrowing_Engine.hs"}
 
 fun exec verbose code =
   ML_Context.exec (fn () =>
--- a/src/Pure/ML/ml_context.ML	Fri Aug 12 11:53:47 2016 +0200
+++ b/src/Pure/ML/ml_context.ML	Fri Aug 12 11:54:36 2016 +0200
@@ -96,7 +96,7 @@
 local
 
 val antiq =
-  Parse.!!! ((Parse.token Parse.name ::: Parse.args) --| Scan.ahead Parse.eof);
+  Parse.!!! ((Parse.token Parse.liberal_name ::: Parse.args) --| Scan.ahead Parse.eof);
 
 fun make_env name visible =
   (ML_Lex.tokenize