--- a/src/Pure/General/markup.ML Sat Jun 06 19:58:10 2009 +0200
+++ b/src/Pure/General/markup.ML Sat Jun 06 19:58:10 2009 +0200
@@ -71,6 +71,8 @@
val ML_commentN: string val ML_comment: T
val ML_malformedN: string val ML_malformed: T
val ML_defN: string val ML_def: T
+ val ML_openN: string val ML_open: T
+ val ML_structN: string val ML_struct: T
val ML_refN: string val ML_ref: T
val ML_typingN: string val ML_typing: T
val ML_sourceN: string val ML_source: T
@@ -237,6 +239,8 @@
val (ML_malformedN, ML_malformed) = markup_elem "ML_malformed";
val (ML_defN, ML_def) = markup_elem "ML_def";
+val (ML_openN, ML_open) = markup_elem "ML_open";
+val (ML_structN, ML_struct) = markup_elem "ML_struct";
val (ML_refN, ML_ref) = markup_elem "ML_ref";
val (ML_typingN, ML_typing) = markup_elem "ML_typing";
--- a/src/Pure/General/markup.scala Sat Jun 06 19:58:10 2009 +0200
+++ b/src/Pure/General/markup.scala Sat Jun 06 19:58:10 2009 +0200
@@ -92,6 +92,8 @@
val ML_MALFORMED = "ML_malformed"
val ML_DEF = "ML_def"
+ val ML_OPEN = "ML_open"
+ val ML_STRUCT = "ML_struct"
val ML_REF = "ML_ref"
val ML_TYPING = "ML_typing"