src/Pure/ProofGeneral/pgml_isabelle.ML
changeset 25273 189db9ef803f
parent 23935 2a4e42ec9a54
equal deleted inserted replaced
25272:2dbc2bbe237a 25273:189db9ef803f
    16 (** print mode **)
    16 (** print mode **)
    17 
    17 
    18 val pgmlN = "PGML";
    18 val pgmlN = "PGML";
    19 fun pgml_mode f x = PrintMode.with_modes [pgmlN] f x;
    19 fun pgml_mode f x = PrintMode.with_modes [pgmlN] f x;
    20 
    20 
       
    21 val _ = Output.add_mode pgmlN Output.default_output Output.default_escape;
    21 val _ = Markup.add_mode pgmlN (fn markup as (name, _) => ("", ""));
    22 val _ = Markup.add_mode pgmlN (fn markup as (name, _) => ("", ""));
    22 
    23 
    23 end;
    24 end;