src/Pure/Isar/parse.scala
changeset 69887 b9985133805d
parent 66914 fb3f13a9c756
child 69891 def3ec9cdb7e
--- a/src/Pure/Isar/parse.scala	Sat Mar 09 23:57:07 2019 +0100
+++ b/src/Pure/Isar/parse.scala	Sun Mar 10 00:21:34 2019 +0100
@@ -80,7 +80,13 @@
           tok.kind == Token.Kind.IDENT ||
           tok.kind == Token.Kind.STRING)
 
-    def tags: Parser[List[String]] = rep($$$("%") ~> tag_name)
+    def tag: Parser[String] = $$$("%") ~> tag_name
+    def tags: Parser[List[String]] = rep(tag)
+
+    def marker: Parser[String] =
+      ($$$(Symbol.marker) | $$$(Symbol.marker_decoded)) ~! embedded ^^ { case _ ~ x => x }
+
+    def annotation: Parser[Unit] = rep(marker | tag) ^^ { case _ => () }
 
 
     /* wrappers */