--- a/src/Pure/ML/ml_lex.ML Fri Nov 07 17:43:50 2014 +0100
+++ b/src/Pure/ML/ml_lex.ML Fri Nov 07 19:47:05 2014 +0100
@@ -44,7 +44,7 @@
"type", "val", "where", "while", "with", "withtype"];
val keywords2 =
- ["case", "do", "else", "end", "if", "in", "let", "local", "of",
+ ["and", "case", "do", "else", "end", "if", "in", "let", "local", "of",
"sig", "struct", "then", "while", "with"];
val keywords3 =
--- a/src/Pure/ML/ml_lex.scala Fri Nov 07 17:43:50 2014 +0100
+++ b/src/Pure/ML/ml_lex.scala Fri Nov 07 19:47:05 2014 +0100
@@ -26,8 +26,8 @@
"with", "withtype")
val keywords2: Set[String] =
- Set("case", "do", "else", "end", "if", "in", "let", "local", "of",
- "sig", "struct", "then", "while", "with")
+ Set("and", "case", "do", "else", "end", "if", "in", "let", "local",
+ "of", "sig", "struct", "then", "while", "with")
val keywords3: Set[String] =
Set("handle", "open", "raise")