equal
deleted
inserted
replaced
133 val removed_versions: Properties.T |
133 val removed_versions: Properties.T |
134 val invoke_scala: string -> string -> Properties.T |
134 val invoke_scala: string -> string -> Properties.T |
135 val cancel_scala: string -> Properties.T |
135 val cancel_scala: string -> Properties.T |
136 val ML_statistics: Properties.entry |
136 val ML_statistics: Properties.entry |
137 val task_statistics: Properties.entry |
137 val task_statistics: Properties.entry |
|
138 val command_timing: Properties.entry |
138 val loading_theory: string -> Properties.T |
139 val loading_theory: string -> Properties.T |
139 val dest_loading_theory: Properties.T -> string option |
140 val dest_loading_theory: Properties.T -> string option |
140 val no_output: Output.output * Output.output |
141 val no_output: Output.output * Output.output |
141 val default_output: T -> Output.output * Output.output |
142 val default_output: T -> Output.output * Output.output |
142 val add_mode: string -> (T -> Output.output * Output.output) -> unit |
143 val add_mode: string -> (T -> Output.output * Output.output) -> unit |
412 fun cancel_scala id = [(functionN, "cancel_scala"), (idN, id)]; |
413 fun cancel_scala id = [(functionN, "cancel_scala"), (idN, id)]; |
413 |
414 |
414 val ML_statistics = (functionN, "ML_statistics"); |
415 val ML_statistics = (functionN, "ML_statistics"); |
415 |
416 |
416 val task_statistics = (functionN, "task_statistics"); |
417 val task_statistics = (functionN, "task_statistics"); |
|
418 |
|
419 val command_timing = (functionN, "command_timing"); |
417 |
420 |
418 fun loading_theory name = [("function", "loading_theory"), ("name", name)]; |
421 fun loading_theory name = [("function", "loading_theory"), ("name", name)]; |
419 |
422 |
420 fun dest_loading_theory [("function", "loading_theory"), ("name", name)] = SOME name |
423 fun dest_loading_theory [("function", "loading_theory"), ("name", name)] = SOME name |
421 | dest_loading_theory _ = NONE; |
424 | dest_loading_theory _ = NONE; |