src/Tools/jEdit/src/plugin.scala
author wenzelm
Tue Jun 21 01:08:15 2011 +0200 (2011-06-21)
changeset 43487 98cd7e83fc5b
parent 43482 ebb90ff55b79
child 43510 17d431c92575
permissions -rw-r--r--
some support for user symbol fonts;
wenzelm@43282
     1
/*  Title:      Tools/jEdit/src/plugin.scala
wenzelm@36760
     2
    Author:     Makarius
wenzelm@36760
     3
wenzelm@36760
     4
Main Isabelle/jEdit plugin setup.
wenzelm@36760
     5
*/
wenzelm@34407
     6
wenzelm@34318
     7
package isabelle.jedit
wenzelm@34318
     8
wenzelm@34429
     9
wenzelm@36015
    10
import isabelle._
wenzelm@36015
    11
wenzelm@34429
    12
import java.io.{FileInputStream, IOException}
wenzelm@34318
    13
import java.awt.Font
wenzelm@34318
    14
wenzelm@34497
    15
import scala.collection.mutable
wenzelm@39517
    16
import scala.swing.ComboBox
immler@34406
    17
wenzelm@39241
    18
import org.gjt.sp.jedit.{jEdit, GUIUtilities, EBMessage, EBPlugin,
wenzelm@39241
    19
  Buffer, EditPane, ServiceManager, View}
immler@34406
    20
import org.gjt.sp.jedit.buffer.JEditBuffer
wenzelm@39043
    21
import org.gjt.sp.jedit.textarea.{JEditTextArea, TextArea}
wenzelm@43452
    22
import org.gjt.sp.jedit.syntax.{Token => JEditToken, ModeProvider}
wenzelm@39633
    23
import org.gjt.sp.jedit.msg.{EditorStarted, BufferUpdate, EditPaneUpdate, PropertiesChanged}
wenzelm@37068
    24
import org.gjt.sp.jedit.gui.DockableWindowManager
wenzelm@34429
    25
wenzelm@43443
    26
import org.gjt.sp.util.SyntaxUtilities
wenzelm@39241
    27
import org.gjt.sp.util.Log
wenzelm@39241
    28
wenzelm@39630
    29
import scala.actors.Actor
wenzelm@39630
    30
import Actor._
wenzelm@39630
    31
wenzelm@34318
    32
wenzelm@34618
    33
object Isabelle
wenzelm@34618
    34
{
wenzelm@34784
    35
  /* plugin instance */
wenzelm@34784
    36
wenzelm@43443
    37
  var plugin: Plugin = null
wenzelm@34784
    38
  var system: Isabelle_System = null
wenzelm@34784
    39
  var session: Session = null
wenzelm@34784
    40
wenzelm@34784
    41
wenzelm@34618
    42
  /* properties */
wenzelm@34618
    43
wenzelm@34618
    44
  val OPTION_PREFIX = "options.isabelle."
wenzelm@34618
    45
wenzelm@34618
    46
  object Property
wenzelm@34618
    47
  {
wenzelm@36814
    48
    def apply(name: String): String =
wenzelm@36814
    49
      jEdit.getProperty(OPTION_PREFIX + name)
wenzelm@36814
    50
    def apply(name: String, default: String): String =
wenzelm@36814
    51
      jEdit.getProperty(OPTION_PREFIX + name, default)
wenzelm@36814
    52
    def update(name: String, value: String) =
wenzelm@36814
    53
      jEdit.setProperty(OPTION_PREFIX + name, value)
wenzelm@34468
    54
  }
wenzelm@34433
    55
wenzelm@34618
    56
  object Boolean_Property
wenzelm@34618
    57
  {
wenzelm@36814
    58
    def apply(name: String): Boolean =
wenzelm@36814
    59
      jEdit.getBooleanProperty(OPTION_PREFIX + name)
wenzelm@36814
    60
    def apply(name: String, default: Boolean): Boolean =
wenzelm@36814
    61
      jEdit.getBooleanProperty(OPTION_PREFIX + name, default)
wenzelm@36814
    62
    def update(name: String, value: Boolean) =
wenzelm@36814
    63
      jEdit.setBooleanProperty(OPTION_PREFIX + name, value)
wenzelm@34618
    64
  }
wenzelm@34618
    65
wenzelm@34618
    66
  object Int_Property
wenzelm@34618
    67
  {
wenzelm@36814
    68
    def apply(name: String): Int =
wenzelm@36814
    69
      jEdit.getIntegerProperty(OPTION_PREFIX + name)
wenzelm@36814
    70
    def apply(name: String, default: Int): Int =
wenzelm@36814
    71
      jEdit.getIntegerProperty(OPTION_PREFIX + name, default)
wenzelm@36814
    72
    def update(name: String, value: Int) =
wenzelm@36814
    73
      jEdit.setIntegerProperty(OPTION_PREFIX + name, value)
wenzelm@34618
    74
  }
wenzelm@34618
    75
wenzelm@40848
    76
  object Double_Property
wenzelm@40848
    77
  {
wenzelm@40848
    78
    def apply(name: String): Double =
wenzelm@40848
    79
      jEdit.getDoubleProperty(OPTION_PREFIX + name, 0.0)
wenzelm@40848
    80
    def apply(name: String, default: Double): Double =
wenzelm@40848
    81
      jEdit.getDoubleProperty(OPTION_PREFIX + name, default)
wenzelm@40848
    82
    def update(name: String, value: Double) =
wenzelm@40848
    83
      jEdit.setDoubleProperty(OPTION_PREFIX + name, value)
wenzelm@40848
    84
  }
wenzelm@40848
    85
wenzelm@40850
    86
  object Time_Property
wenzelm@40850
    87
  {
wenzelm@40850
    88
    def apply(name: String): Time =
wenzelm@40850
    89
      Time.seconds(Double_Property(name))
wenzelm@40850
    90
    def apply(name: String, default: Time): Time =
wenzelm@40850
    91
      Time.seconds(Double_Property(name, default.seconds))
wenzelm@40850
    92
    def update(name: String, value: Time) =
wenzelm@40850
    93
      Double_Property.update(name, value.seconds)
wenzelm@40850
    94
  }
wenzelm@40850
    95
wenzelm@40848
    96
wenzelm@37164
    97
  /* font */
wenzelm@37164
    98
wenzelm@37164
    99
  def font_family(): String = jEdit.getProperty("view.font")
wenzelm@37164
   100
wenzelm@37019
   101
  def font_size(): Float =
wenzelm@37019
   102
    (jEdit.getIntegerProperty("view.fontsize", 16) *
wenzelm@37019
   103
      Int_Property("relative-font-size", 100)).toFloat / 100
wenzelm@36814
   104
wenzelm@34618
   105
wenzelm@39043
   106
  /* text area ranges */
wenzelm@39043
   107
wenzelm@39043
   108
  case class Gfx_Range(val x: Int, val y: Int, val length: Int)
wenzelm@39043
   109
wenzelm@39043
   110
  def gfx_range(text_area: TextArea, range: Text.Range): Option[Gfx_Range] =
wenzelm@39043
   111
  {
wenzelm@39043
   112
    val p = text_area.offsetToXY(range.start)
wenzelm@39043
   113
    val q = text_area.offsetToXY(range.stop)
wenzelm@39043
   114
    if (p != null && q != null && p.y == q.y) Some(new Gfx_Range(p.x, p.y, q.x - p.x))
wenzelm@39043
   115
    else None
wenzelm@39043
   116
  }
wenzelm@39043
   117
wenzelm@39043
   118
wenzelm@37201
   119
  /* tooltip markup */
wenzelm@37201
   120
wenzelm@37201
   121
  def tooltip(text: String): String =
wenzelm@37203
   122
    "<html><pre style=\"font-family: " + font_family() + "; font-size: " +
wenzelm@37203
   123
        Int_Property("tooltip-font-size", 10).toString + "px; \">" +  // FIXME proper scaling (!?)
wenzelm@37203
   124
      HTML.encode(text) + "</pre></html>"
wenzelm@37201
   125
wenzelm@40849
   126
  def tooltip_dismiss_delay(): Time =
wenzelm@40852
   127
    Time_Property("tooltip-dismiss-delay", Time.seconds(8.0)) max Time.seconds(0.5)
wenzelm@38854
   128
wenzelm@38854
   129
  def setup_tooltips()
wenzelm@38854
   130
  {
wenzelm@38854
   131
    Swing_Thread.now {
wenzelm@38854
   132
      val manager = javax.swing.ToolTipManager.sharedInstance
wenzelm@40849
   133
      manager.setDismissDelay(tooltip_dismiss_delay().ms.toInt)
wenzelm@38854
   134
    }
wenzelm@38854
   135
  }
wenzelm@38854
   136
wenzelm@37201
   137
wenzelm@39241
   138
  /* icons */
wenzelm@39241
   139
wenzelm@39241
   140
  def load_icon(name: String): javax.swing.Icon =
wenzelm@39241
   141
  {
wenzelm@39241
   142
    val icon = GUIUtilities.loadIcon(name)
wenzelm@39241
   143
    if (icon.getIconWidth < 0 || icon.getIconHeight < 0)
wenzelm@39630
   144
      Log.log(Log.ERROR, icon, "Bad icon: " + name)
wenzelm@39241
   145
    icon
wenzelm@39241
   146
  }
wenzelm@39241
   147
wenzelm@39241
   148
wenzelm@41382
   149
  /* check JVM */
wenzelm@41382
   150
wenzelm@41382
   151
  def check_jvm()
wenzelm@41382
   152
  {
wenzelm@41382
   153
    if (!Platform.is_hotspot) {
wenzelm@41382
   154
      Library.warning_dialog(jEdit.getActiveView, "Bad Java Virtual Machine",
wenzelm@41382
   155
        "This is " + Platform.jvm_name,
wenzelm@41382
   156
        "Isabelle/jEdit requires Java Hotspot from Sun/Oracle/Apple!")
wenzelm@41382
   157
    }
wenzelm@41382
   158
  }
wenzelm@41382
   159
wenzelm@41382
   160
wenzelm@38221
   161
  /* main jEdit components */
wenzelm@34784
   162
wenzelm@37177
   163
  def jedit_buffers(): Iterator[Buffer] = jEdit.getBuffers().iterator
wenzelm@34784
   164
wenzelm@37177
   165
  def jedit_views(): Iterator[View] = jEdit.getViews().iterator
wenzelm@34784
   166
wenzelm@34784
   167
  def jedit_text_areas(view: View): Iterator[JEditTextArea] =
wenzelm@37177
   168
    view.getEditPanes().iterator.map(_.getTextArea)
wenzelm@34784
   169
wenzelm@34784
   170
  def jedit_text_areas(): Iterator[JEditTextArea] =
wenzelm@34784
   171
    jedit_views().flatMap(jedit_text_areas(_))
wenzelm@34784
   172
wenzelm@34784
   173
  def jedit_text_areas(buffer: JEditBuffer): Iterator[JEditTextArea] =
wenzelm@34784
   174
    jedit_text_areas().filter(_.getBuffer == buffer)
wenzelm@34784
   175
wenzelm@38843
   176
  def buffer_lock[A](buffer: JEditBuffer)(body: => A): A =
wenzelm@38640
   177
  {
wenzelm@38640
   178
    try { buffer.readLock(); body }
wenzelm@38640
   179
    finally { buffer.readUnlock() }
wenzelm@38640
   180
  }
wenzelm@38640
   181
wenzelm@38843
   182
  def swing_buffer_lock[A](buffer: JEditBuffer)(body: => A): A =
wenzelm@38843
   183
    Swing_Thread.now { buffer_lock(buffer) { body } }
wenzelm@38843
   184
wenzelm@40474
   185
  def buffer_text(buffer: JEditBuffer): String =
wenzelm@40474
   186
    buffer_lock(buffer) { buffer.getText(0, buffer.getLength) }
wenzelm@40474
   187
wenzelm@34784
   188
wenzelm@43449
   189
  /* document model and view */
wenzelm@43449
   190
wenzelm@43449
   191
  def document_model(buffer: Buffer): Option[Document_Model] = Document_Model(buffer)
wenzelm@43449
   192
  def document_view(text_area: JEditTextArea): Option[Document_View] = Document_View(text_area)
wenzelm@43449
   193
wenzelm@43449
   194
wenzelm@37068
   195
  /* dockable windows */
wenzelm@37068
   196
wenzelm@37068
   197
  private def wm(view: View): DockableWindowManager = view.getDockableWindowManager
wenzelm@37068
   198
wenzelm@39515
   199
  def docked_session(view: View): Option[Session_Dockable] =
wenzelm@39515
   200
    wm(view).getDockableWindow("isabelle-session") match {
wenzelm@39515
   201
      case dockable: Session_Dockable => Some(dockable)
wenzelm@39515
   202
      case _ => None
wenzelm@39515
   203
    }
wenzelm@39515
   204
wenzelm@37068
   205
  def docked_output(view: View): Option[Output_Dockable] =
wenzelm@37068
   206
    wm(view).getDockableWindow("isabelle-output") match {
wenzelm@37068
   207
      case dockable: Output_Dockable => Some(dockable)
wenzelm@37068
   208
      case _ => None
wenzelm@37068
   209
    }
wenzelm@37068
   210
wenzelm@37068
   211
  def docked_raw_output(view: View): Option[Raw_Output_Dockable] =
wenzelm@37068
   212
    wm(view).getDockableWindow("isabelle-raw-output") match {
wenzelm@37068
   213
      case dockable: Raw_Output_Dockable => Some(dockable)
wenzelm@37068
   214
      case _ => None
wenzelm@37068
   215
    }
wenzelm@37068
   216
wenzelm@37068
   217
  def docked_protocol(view: View): Option[Protocol_Dockable] =
wenzelm@37068
   218
    wm(view).getDockableWindow("isabelle-protocol") match {
wenzelm@37068
   219
      case dockable: Protocol_Dockable => Some(dockable)
wenzelm@37068
   220
      case _ => None
wenzelm@37068
   221
    }
wenzelm@37068
   222
wenzelm@37068
   223
wenzelm@39517
   224
  /* logic image */
wenzelm@39517
   225
wenzelm@39517
   226
  def default_logic(): String =
wenzelm@39517
   227
  {
wenzelm@39517
   228
    val logic = system.getenv("JEDIT_LOGIC")
wenzelm@39517
   229
    if (logic != "") logic
wenzelm@39517
   230
    else system.getenv_strict("ISABELLE_LOGIC")
wenzelm@39517
   231
  }
wenzelm@39517
   232
wenzelm@39517
   233
  class Logic_Entry(val name: String, val description: String)
wenzelm@39517
   234
  {
wenzelm@39517
   235
    override def toString = description
wenzelm@39517
   236
  }
wenzelm@39517
   237
wenzelm@39517
   238
  def logic_selector(logic: String): ComboBox[Logic_Entry] =
wenzelm@39517
   239
  {
wenzelm@39517
   240
    val entries =
wenzelm@39517
   241
      new Logic_Entry("", "default (" + default_logic() + ")") ::
wenzelm@39517
   242
        system.find_logics().map(name => new Logic_Entry(name, name))
wenzelm@39517
   243
    val component = new ComboBox(entries)
wenzelm@39517
   244
    entries.find(_.name == logic) match {
wenzelm@39517
   245
      case None =>
wenzelm@39517
   246
      case Some(entry) => component.selection.item = entry
wenzelm@39517
   247
    }
wenzelm@39702
   248
    component.tooltip = "Isabelle logic image"
wenzelm@39517
   249
    component
wenzelm@39517
   250
  }
wenzelm@39702
   251
wenzelm@39702
   252
  def start_session()
wenzelm@39702
   253
  {
wenzelm@40852
   254
    val timeout = Time_Property("startup-timeout", Time.seconds(10)) max Time.seconds(5)
wenzelm@39702
   255
    val modes = system.getenv("JEDIT_PRINT_MODE").split(",").toList.map("-m" + _)
wenzelm@39702
   256
    val logic = {
wenzelm@39702
   257
      val logic = Property("logic")
wenzelm@39702
   258
      if (logic != null && logic != "") logic
wenzelm@39702
   259
      else Isabelle.default_logic()
wenzelm@39702
   260
    }
wenzelm@40850
   261
    session.start(timeout, modes ::: List(logic))
wenzelm@39702
   262
  }
wenzelm@34318
   263
}
wenzelm@34318
   264
wenzelm@34429
   265
wenzelm@34618
   266
class Plugin extends EBPlugin
wenzelm@34618
   267
{
wenzelm@39630
   268
  /* session management */
wenzelm@39630
   269
wenzelm@39735
   270
  private def init_model(buffer: Buffer)
wenzelm@39630
   271
  {
wenzelm@39630
   272
    Isabelle.swing_buffer_lock(buffer) {
wenzelm@39735
   273
      val opt_model =
wenzelm@39735
   274
        Document_Model(buffer) match {
wenzelm@43452
   275
          case Some(model) => Some(model)
wenzelm@39735
   276
          case None =>
wenzelm@39735
   277
            Thy_Header.split_thy_path(Isabelle.system.posix_path(buffer.getPath)) match {
wenzelm@41537
   278
              case Some((dir, thy_name)) =>
wenzelm@41537
   279
                Some(Document_Model.init(Isabelle.session, buffer, dir + "/" + thy_name))
wenzelm@39735
   280
              case None => None
wenzelm@39735
   281
            }
wenzelm@39735
   282
        }
wenzelm@39735
   283
      if (opt_model.isDefined) {
wenzelm@39735
   284
        for (text_area <- Isabelle.jedit_text_areas(buffer)) {
wenzelm@39735
   285
          if (Document_View(text_area).map(_.model) != opt_model)
wenzelm@39735
   286
            Document_View.init(opt_model.get, text_area)
wenzelm@39735
   287
        }
wenzelm@39630
   288
      }
wenzelm@39630
   289
    }
wenzelm@39630
   290
  }
wenzelm@39630
   291
wenzelm@39735
   292
  private def exit_model(buffer: Buffer)
wenzelm@39630
   293
  {
wenzelm@39630
   294
    Isabelle.swing_buffer_lock(buffer) {
wenzelm@39637
   295
      Isabelle.jedit_text_areas(buffer).foreach(Document_View.exit)
wenzelm@39637
   296
      Document_Model.exit(buffer)
wenzelm@39630
   297
    }
wenzelm@39630
   298
  }
wenzelm@39630
   299
wenzelm@39735
   300
  private case class Init_Model(buffer: Buffer)
wenzelm@39735
   301
  private case class Exit_Model(buffer: Buffer)
wenzelm@39741
   302
  private case class Init_View(buffer: Buffer, text_area: JEditTextArea)
wenzelm@39741
   303
  private case class Exit_View(buffer: Buffer, text_area: JEditTextArea)
wenzelm@39735
   304
wenzelm@39633
   305
  private val session_manager = actor {
wenzelm@39735
   306
    var ready = false
wenzelm@39633
   307
    loop {
wenzelm@39633
   308
      react {
wenzelm@39735
   309
        case phase: Session.Phase =>
wenzelm@39735
   310
          ready = phase == Session.Ready
wenzelm@39735
   311
          phase match {
wenzelm@39735
   312
            case Session.Failed =>
wenzelm@39735
   313
              Swing_Thread.now {
wenzelm@39735
   314
                val text = new scala.swing.TextArea(Isabelle.session.syslog())
wenzelm@39735
   315
                text.editable = false
wenzelm@39735
   316
                Library.error_dialog(jEdit.getActiveView, "Failed to start Isabelle process", text)
wenzelm@39735
   317
              }
wenzelm@39735
   318
wenzelm@39735
   319
            case Session.Ready => Isabelle.jedit_buffers.foreach(init_model)
wenzelm@39735
   320
            case Session.Shutdown => Isabelle.jedit_buffers.foreach(exit_model)
wenzelm@39735
   321
            case _ =>
wenzelm@39735
   322
          }
wenzelm@39735
   323
wenzelm@39735
   324
        case Init_Model(buffer) =>
wenzelm@39735
   325
          if (ready) init_model(buffer)
wenzelm@39630
   326
wenzelm@39735
   327
        case Exit_Model(buffer) =>
wenzelm@39735
   328
          exit_model(buffer)
wenzelm@39735
   329
wenzelm@39735
   330
        case Init_View(buffer, text_area) =>
wenzelm@39735
   331
          if (ready) {
wenzelm@39735
   332
            Isabelle.swing_buffer_lock(buffer) {
wenzelm@39735
   333
              Document_Model(buffer) match {
wenzelm@39735
   334
                case Some(model) => Document_View.init(model, text_area)
wenzelm@39735
   335
                case None =>
wenzelm@39735
   336
              }
wenzelm@39735
   337
            }
wenzelm@39735
   338
          }
wenzelm@39735
   339
wenzelm@39735
   340
        case Exit_View(buffer, text_area) =>
wenzelm@39735
   341
          Isabelle.swing_buffer_lock(buffer) {
wenzelm@39735
   342
            Document_View.exit(text_area)
wenzelm@39735
   343
          }
wenzelm@39735
   344
wenzelm@39735
   345
        case bad => System.err.println("session_manager: ignoring bad message " + bad)
wenzelm@39630
   346
      }
wenzelm@39630
   347
    }
wenzelm@39630
   348
  }
wenzelm@39630
   349
wenzelm@39630
   350
wenzelm@34618
   351
  /* main plugin plumbing */
wenzelm@34433
   352
wenzelm@34767
   353
  override def handleMessage(message: EBMessage)
wenzelm@34618
   354
  {
wenzelm@34767
   355
    message match {
wenzelm@41383
   356
      case msg: EditorStarted =>
wenzelm@41383
   357
      Isabelle.check_jvm()
wenzelm@41383
   358
      if (Isabelle.Boolean_Property("auto-start")) Isabelle.start_session()
wenzelm@39630
   359
wenzelm@37557
   360
      case msg: BufferUpdate
wenzelm@39735
   361
      if msg.getWhat == BufferUpdate.PROPERTIES_CHANGED =>
wenzelm@39634
   362
wenzelm@39633
   363
        val buffer = msg.getBuffer
wenzelm@39735
   364
        if (buffer != null) session_manager ! Init_Model(buffer)
wenzelm@37557
   365
wenzelm@39634
   366
      case msg: EditPaneUpdate
wenzelm@39735
   367
      if (msg.getWhat == EditPaneUpdate.BUFFER_CHANGING ||
wenzelm@39637
   368
          msg.getWhat == EditPaneUpdate.BUFFER_CHANGED ||
wenzelm@39634
   369
          msg.getWhat == EditPaneUpdate.CREATED ||
wenzelm@39634
   370
          msg.getWhat == EditPaneUpdate.DESTROYED) =>
wenzelm@39634
   371
wenzelm@34784
   372
        val edit_pane = msg.getEditPane
wenzelm@34784
   373
        val buffer = edit_pane.getBuffer
wenzelm@34784
   374
        val text_area = edit_pane.getTextArea
wenzelm@34784
   375
wenzelm@39637
   376
        if (buffer != null && text_area != null) {
wenzelm@39735
   377
          if (msg.getWhat == EditPaneUpdate.BUFFER_CHANGED ||
wenzelm@39735
   378
              msg.getWhat == EditPaneUpdate.CREATED)
wenzelm@39735
   379
            session_manager ! Init_View(buffer, text_area)
wenzelm@39735
   380
          else
wenzelm@39735
   381
            session_manager ! Exit_View(buffer, text_area)
immler@34671
   382
        }
wenzelm@34784
   383
wenzelm@34777
   384
      case msg: PropertiesChanged =>
wenzelm@43390
   385
        Swing_Thread.now { Isabelle.setup_tooltips() }
wenzelm@34791
   386
        Isabelle.session.global_settings.event(Session.Global_Settings)
wenzelm@34784
   387
wenzelm@34318
   388
      case _ =>
wenzelm@34318
   389
    }
wenzelm@34318
   390
  }
wenzelm@34318
   391
wenzelm@34618
   392
  override def start()
wenzelm@34618
   393
  {
wenzelm@43443
   394
    Isabelle.plugin = this
wenzelm@39630
   395
    Isabelle.setup_tooltips()
wenzelm@34615
   396
    Isabelle.system = new Isabelle_System
wenzelm@34774
   397
    Isabelle.system.install_fonts()
wenzelm@39628
   398
    Isabelle.session = new Session(Isabelle.system)
wenzelm@43487
   399
    SyntaxUtilities.setStyleExtender(new Token_Markup.Style_Extender(Isabelle.system.symbols))
wenzelm@43482
   400
    ModeProvider.instance = new Token_Markup.Mode_Provider(ModeProvider.instance)
wenzelm@39633
   401
    Isabelle.session.phase_changed += session_manager
wenzelm@34318
   402
  }
wenzelm@34618
   403
wenzelm@39628
   404
  override def stop()
wenzelm@34618
   405
  {
wenzelm@39628
   406
    Isabelle.session.stop()
wenzelm@39633
   407
    Isabelle.session.phase_changed -= session_manager
wenzelm@34318
   408
  }
wenzelm@34318
   409
}