src/Pure/General/markup.ML
changeset 27879 67d14d7c7143
parent 27875 1b46d9ec3788
child 27883 e506f0c6d3f0
equal deleted inserted replaced
27878:1ba19c9edd18 27879:67d14d7c7143
    60   val propN: string val prop: T
    60   val propN: string val prop: T
    61   val attributeN: string val attribute: string -> T
    61   val attributeN: string val attribute: string -> T
    62   val methodN: string val method: string -> T
    62   val methodN: string val method: string -> T
    63   val ML_sourceN: string val ML_source: T
    63   val ML_sourceN: string val ML_source: T
    64   val doc_sourceN: string val doc_source: T
    64   val doc_sourceN: string val doc_source: T
       
    65   val antiqN: string val antiq: T
    65   val keyword_declN: string val keyword_decl: string -> T
    66   val keyword_declN: string val keyword_decl: string -> T
    66   val command_declN: string val command_decl: string -> string -> T
    67   val command_declN: string val command_decl: string -> string -> T
    67   val keywordN: string val keyword: string -> T
    68   val keywordN: string val keyword: string -> T
    68   val commandN: string val command: string -> T
    69   val commandN: string val command: string -> T
    69   val identN: string val ident: T
    70   val identN: string val ident: T
    72   val verbatimN: string val verbatim: T
    73   val verbatimN: string val verbatim: T
    73   val commentN: string val comment: T
    74   val commentN: string val comment: T
    74   val controlN: string val control: T
    75   val controlN: string val control: T
    75   val malformedN: string val malformed: T
    76   val malformedN: string val malformed: T
    76   val tokenN: string val token: T
    77   val tokenN: string val token: T
    77   val antiqN: string val antiq: T
       
    78   val command_spanN: string val command_span: string -> T
    78   val command_spanN: string val command_span: string -> T
    79   val ignored_spanN: string val ignored_span: T
    79   val ignored_spanN: string val ignored_span: T
    80   val malformed_spanN: string val malformed_span: T
    80   val malformed_spanN: string val malformed_span: T
    81   val promptN: string val prompt: T
    81   val promptN: string val prompt: T
    82   val stateN: string val state: T
    82   val stateN: string val state: T
   200 (* embedded source text *)
   200 (* embedded source text *)
   201 
   201 
   202 val (ML_sourceN, ML_source) = markup_elem "ML_source";
   202 val (ML_sourceN, ML_source) = markup_elem "ML_source";
   203 val (doc_sourceN, doc_source) = markup_elem "doc_source";
   203 val (doc_sourceN, doc_source) = markup_elem "doc_source";
   204 
   204 
       
   205 val (antiqN, antiq) = markup_elem "antiq";
       
   206 
   205 
   207 
   206 (* outer syntax *)
   208 (* outer syntax *)
   207 
   209 
   208 val (keyword_declN, keyword_decl) = markup_string "keyword_decl" nameN;
   210 val (keyword_declN, keyword_decl) = markup_string "keyword_decl" nameN;
   209 
   211 
   220 val (controlN, control) = markup_elem "control";
   222 val (controlN, control) = markup_elem "control";
   221 val (malformedN, malformed) = markup_elem "malformed";
   223 val (malformedN, malformed) = markup_elem "malformed";
   222 
   224 
   223 val (tokenN, token) = markup_elem "token";
   225 val (tokenN, token) = markup_elem "token";
   224 
   226 
   225 val (antiqN, antiq) = markup_elem "antiq";
       
   226 
       
   227 val (command_spanN, command_span) = markup_string "command_span" nameN;
   227 val (command_spanN, command_span) = markup_string "command_span" nameN;
   228 val (ignored_spanN, ignored_span) = markup_elem "ignored_span";
   228 val (ignored_spanN, ignored_span) = markup_elem "ignored_span";
   229 val (malformed_spanN, malformed_span) = markup_elem "malformed_span";
   229 val (malformed_spanN, malformed_span) = markup_elem "malformed_span";
   230 
   230 
   231 
   231