src/Tools/jEdit/src/debugger_dockable.scala
changeset 81387 c677755779f5
parent 81379 cbfc76aace10
child 81398 f92ea68473f2
equal deleted inserted replaced
81386:bcd880130390 81387:c677755779f5
    66 
    66 
    67   /* pretty text area */
    67   /* pretty text area */
    68 
    68 
    69   private val output: Output_Area =
    69   private val output: Output_Area =
    70     new Output_Area(view, root_name = "Threads", split = true) {
    70     new Output_Area(view, root_name = "Threads", split = true) {
    71       override def handle_resize(): Unit = pretty_text_area.zoom(zoom)
       
    72 
       
    73       override def handle_update(): Unit = {
    71       override def handle_update(): Unit = {
    74         val new_snapshot = PIDE.editor.current_node_snapshot(view).getOrElse(current_snapshot)
    72         val new_snapshot = PIDE.editor.current_node_snapshot(view).getOrElse(current_snapshot)
    75         val (new_threads, new_output) = debugger.status(tree_selection())
    73         val (new_threads, new_output) = debugger.status(tree_selection())
    76 
    74 
    77         if (new_threads != current_threads) update_tree(new_threads)
    75         if (new_threads != current_threads) update_tree(new_threads)
   229 
   227 
   230   private val sml_button = new GUI.Check("SML") {
   228   private val sml_button = new GUI.Check("SML") {
   231     tooltip = "Official Standard ML instead of Isabelle/ML"
   229     tooltip = "Official Standard ML instead of Isabelle/ML"
   232   }
   230   }
   233 
   231 
   234   private val zoom =
       
   235     new Font_Info.Zoom { override def changed(): Unit = output.handle_resize() }
       
   236 
       
   237   private val controls =
   232   private val controls =
   238     Wrap_Panel(
   233     Wrap_Panel(
   239       List(
   234       List(
   240         break_button, continue_button, step_button, step_over_button, step_out_button,
   235         break_button, continue_button, step_button, step_over_button, step_out_button,
   241         context_label, Component.wrap(context_field),
   236         context_label, Component.wrap(context_field),
   242         expression_label, Component.wrap(expression_field), eval_button, sml_button) :::
   237         expression_label, Component.wrap(expression_field), eval_button, sml_button) :::
   243       output.pretty_text_area.search_components :::
   238       output.pretty_text_area.search_zoom_components)
   244       List(output.pretty_text_area.search_field, zoom))
       
   245 
   239 
   246   add(controls.peer, BorderLayout.NORTH)
   240   add(controls.peer, BorderLayout.NORTH)
   247 
   241 
   248 
   242 
   249   /* focus */
   243   /* focus */