ProgTutorial/output_tutorial.ML
changeset 351 f118240ab44a
parent 328 c0cae24b9d46
child 373 28a49fe024c9
equal deleted inserted replaced
350:364fffa80794 351:f118240ab44a
    77   | boolean "true" = true
    77   | boolean "true" = true
    78   | boolean "false" = false
    78   | boolean "false" = false
    79   | boolean s = error ("Bad boolean value: " ^ quote s);
    79   | boolean s = error ("Bad boolean value: " ^ quote s);
    80 
    80 
    81 val _ = ThyOutput.add_options
    81 val _ = ThyOutput.add_options
    82  [("gray", Library.setmp gray o boolean),
    82  [("gray", Library.setmp_CRITICAL gray o boolean),
    83   ("linenos", Library.setmp linenos o boolean)]
    83   ("linenos", Library.setmp_CRITICAL linenos o boolean)]
    84 
    84 
    85 end
    85 end