src/Pure/General/markup.ML
changeset 29522 793766d4c1b5
parent 29488 8fc3aeece219
child 30221 14145e81a2fe
equal deleted inserted replaced
29521:736bf7117153 29522:793766d4c1b5
    93   val disposedN: string val disposed: T
    93   val disposedN: string val disposed: T
    94   val editsN: string val edits: string -> T
    94   val editsN: string val edits: string -> T
    95   val editN: string val edit: string -> string -> T
    95   val editN: string val edit: string -> string -> T
    96   val pidN: string
    96   val pidN: string
    97   val sessionN: string
    97   val sessionN: string
    98   val classN: string
       
    99   val messageN: string val message: string -> T
       
   100   val promptN: string val prompt: T
    98   val promptN: string val prompt: T
   101   val writelnN: string
       
   102   val priorityN: string
       
   103   val tracingN: string
       
   104   val warningN: string
       
   105   val errorN: string
       
   106   val debugN: string
       
   107   val initN: string
       
   108   val statusN: string
       
   109   val no_output: output * output
    99   val no_output: output * output
   110   val default_output: T -> output * output
   100   val default_output: T -> output * output
   111   val add_mode: string -> (T -> output * output) -> unit
   101   val add_mode: string -> (T -> output * output) -> unit
   112   val output: T -> output * output
   102   val output: T -> output * output
   113   val enclose: T -> output -> output
   103   val enclose: T -> output -> output
   282 (* messages *)
   272 (* messages *)
   283 
   273 
   284 val pidN = "pid";
   274 val pidN = "pid";
   285 val sessionN = "session";
   275 val sessionN = "session";
   286 
   276 
   287 val classN = "class";
       
   288 val (messageN, message) = markup_string "message" classN;
       
   289 
       
   290 val (promptN, prompt) = markup_elem "prompt";
   277 val (promptN, prompt) = markup_elem "prompt";
   291 
   278 
   292 val writelnN = "writeln";
       
   293 val priorityN = "priority";
       
   294 val tracingN = "tracing";
       
   295 val warningN = "warning";
       
   296 val errorN = "error";
       
   297 val debugN = "debug";
       
   298 val initN = "init";
       
   299 val statusN = "status";
       
   300 
   279 
   301 
   280 
   302 (* print mode operations *)
   281 (* print mode operations *)
   303 
   282 
   304 val no_output = ("", "");
   283 val no_output = ("", "");