equal
deleted
inserted
replaced
231 val _ = |
231 val _ = |
232 Isabelle_Process.protocol_command "Debugger.init" |
232 Isabelle_Process.protocol_command "Debugger.init" |
233 (fn [] => init ()); |
233 (fn [] => init ()); |
234 |
234 |
235 val _ = |
235 val _ = |
|
236 Isabelle_Process.protocol_command "Debugger.breakpoint" |
|
237 (fn [serial_string, b_string] => |
|
238 let |
|
239 val serial = Markup.parse_int serial_string; |
|
240 val b = Markup.parse_bool b_string; |
|
241 (* FIXME *) |
|
242 in () end); |
|
243 |
|
244 val _ = |
236 Isabelle_Process.protocol_command "Debugger.cancel" |
245 Isabelle_Process.protocol_command "Debugger.cancel" |
237 (fn [thread_name] => cancel thread_name); |
246 (fn [thread_name] => cancel thread_name); |
238 |
247 |
239 val _ = |
248 val _ = |
240 Isabelle_Process.protocol_command "Debugger.input" |
249 Isabelle_Process.protocol_command "Debugger.input" |