src/Pure/Syntax/syntax.ML
changeset 50201 c26369c9eda6
parent 49674 dbadb4d03cbc
child 51580 64ef8260dc60
--- a/src/Pure/Syntax/syntax.ML	Sun Nov 25 18:50:13 2012 +0100
+++ b/src/Pure/Syntax/syntax.ML	Sun Nov 25 19:49:24 2012 +0100
@@ -167,7 +167,7 @@
 (* outer syntax token -- with optional YXML content *)
 
 fun token_position (XML.Elem ((name, props), _)) =
-      if name = Isabelle_Markup.tokenN then Position.of_properties props
+      if name = Markup.tokenN then Position.of_properties props
       else Position.none
   | token_position (XML.Text _) = Position.none;
 
@@ -190,7 +190,7 @@
   in
     (case YXML.parse_body str handle Fail msg => error msg of
       body as [tree as XML.Elem ((name, _), _)] =>
-        if name = Isabelle_Markup.tokenN then parse_tree tree else decode body
+        if name = Markup.tokenN then parse_tree tree else decode body
     | [tree as XML.Text _] => parse_tree tree
     | body => decode body)
   end;