equal
deleted
inserted
replaced
|
1 /* Title: Pure/Tools/debugger.scala |
|
2 Author: Makarius |
|
3 |
|
4 Interactive debugger for Isabelle/ML. |
|
5 */ |
|
6 |
|
7 package isabelle |
|
8 |
|
9 |
|
10 object Debugger |
|
11 { |
|
12 /* GUI interaction */ |
|
13 |
|
14 case object Event |
|
15 |
|
16 |
|
17 /* manager thread */ |
|
18 |
|
19 private lazy val manager: Consumer_Thread[Any] = |
|
20 Consumer_Thread.fork[Any]("Debugger.manager", daemon = true)( |
|
21 consume = (arg: Any) => |
|
22 { |
|
23 // FIXME |
|
24 true |
|
25 }, |
|
26 finish = () => |
|
27 { |
|
28 // FIXME |
|
29 } |
|
30 ) |
|
31 |
|
32 |
|
33 /* protocol handler */ |
|
34 |
|
35 class Handler extends Session.Protocol_Handler |
|
36 { |
|
37 override def stop(prover: Prover) |
|
38 { |
|
39 manager.shutdown() |
|
40 } |
|
41 |
|
42 val functions = Map.empty[String, (Prover, Prover.Protocol_Output) => Boolean] // FIXME |
|
43 } |
|
44 } |