src/Pure/Isar/parse.ML
changeset 55033 8e8243975860
parent 51988 a9725750c53a
child 55111 5792f5106c40
equal deleted inserted replaced
55032:b49366215417 55033:8e8243975860
    30   val number: string parser
    30   val number: string parser
    31   val float_number: string parser
    31   val float_number: string parser
    32   val string: string parser
    32   val string: string parser
    33   val alt_string: string parser
    33   val alt_string: string parser
    34   val verbatim: string parser
    34   val verbatim: string parser
       
    35   val cartouche: string parser
    35   val sync: string parser
    36   val sync: string parser
    36   val eof: string parser
    37   val eof: string parser
    37   val command_name: string -> string parser
    38   val command_name: string -> string parser
    38   val keyword_with: (string -> bool) -> string parser
    39   val keyword_with: (string -> bool) -> string parser
    39   val keyword_ident_or_symbolic: string parser
    40   val keyword_ident_or_symbolic: string parser
   183 val number = kind Token.Nat;
   184 val number = kind Token.Nat;
   184 val float_number = kind Token.Float;
   185 val float_number = kind Token.Float;
   185 val string = kind Token.String;
   186 val string = kind Token.String;
   186 val alt_string = kind Token.AltString;
   187 val alt_string = kind Token.AltString;
   187 val verbatim = kind Token.Verbatim;
   188 val verbatim = kind Token.Verbatim;
       
   189 val cartouche = kind Token.Cartouche;
   188 val sync = kind Token.Sync;
   190 val sync = kind Token.Sync;
   189 val eof = kind Token.EOF;
   191 val eof = kind Token.EOF;
   190 
   192 
   191 fun keyword_with pred = RESET_VALUE (Scan.one (Token.keyword_with pred) >> Token.content_of);
   193 fun keyword_with pred = RESET_VALUE (Scan.one (Token.keyword_with pred) >> Token.content_of);
   192 val keyword_ident_or_symbolic = keyword_with Token.ident_or_symbolic;
   194 val keyword_ident_or_symbolic = keyword_with Token.ident_or_symbolic;