de.sciss.mellite.InterpreterFrame.scala Maven / Gradle / Ivy

Go to download
/*
 *  InterpreterFrame.scala
 *  (Mellite)
 *
 *  Copyright (c) 2012-2023 Hanns Holger Rutz. All rights reserved.
 *
 *  This software is published under the GNU Affero General Public License v3+
 *
 *
 *  For further information, please contact Hanns Holger Rutz at
 *  [email protected]
 */

package de.sciss.mellite

import de.sciss.desktop
import de.sciss.lucre.Workspace
import de.sciss.mellite.impl.code.{InterpreterFrameImpl => Impl}
import de.sciss.proc

import scala.swing.event.Key

object InterpreterFrame {
  def apply(): InterpreterFrame = Impl()

  object Action extends swing.Action("Interpreter") {
    import desktop.KeyStrokes._
    accelerator = Some(menu1 + Key.R)

    def apply(): Unit = InterpreterFrame()
  }

  /** The content of this object is imported into the REPL */
  object Bindings {
    def document: Workspace[_] =
      Application.documentHandler.activeDocument.getOrElse(sys.error("No document open")).workspace

    def confluentDocument: proc.Workspace.Confluent = document match {
      case cd: proc.Workspace.Confluent => cd
      case _ => sys.error("Not a confluent document")
    }
  }
}
trait InterpreterFrame {
  def component: desktop.Window
}