Mercurial Mercurial > repos > isabelle / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | gz | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
more literal tokens, e.g. "EX!";
authorwenzelm
Mon, 27 May 2013 22:25:32 +0200
changeset 52189 816c88acd269
parent 52188 2da0033370a0
child 52190 c87b7f26e2c7
more literal tokens, e.g. "EX!";
src/Pure/Syntax/lexicon.ML file | annotate | diff | comparison | revisions 
--- a/src/Pure/Syntax/lexicon.ML	Mon May 27 22:00:24 2013 +0200
+++ b/src/Pure/Syntax/lexicon.ML	Mon May 27 22:25:32 2013 +0200
@@ -169,7 +169,9 @@
 (* markup *)
 
 fun literal_markup s =
-  if Symbol.is_ascii_identifier s then Markup.literal else Markup.delimiter;
+  if Symbol.is_ascii_identifier s orelse exists Symbol.is_letter (Symbol.explode s)
+  then Markup.literal
+  else Markup.delimiter;
 
 val token_kind_markup =
  fn TFreeSy => Markup.tfree
isabelle