fileMenu->addSeparator();
fileMenu->addAction(exitAction);
- scripting = new ScriptingDock(new GuileInterpreter, tr("Scripting"), this);
+ QMenu* interpretermenu = menuBar()->addMenu(tr("&Interpreter"));
+
+ interpreter["GUILE"] = new GuileInterpreter;
+ scripting = new ScriptingDock(interpreter["GUILE"], tr("Scripting"), this);
scripting->setAllowedAreas(Qt::BottomDockWidgetArea);
addDockWidget(Qt::BottomDockWidgetArea, scripting);
+ QAction* guileLoad = new QAction(tr("&GUILE"), this);
+ interpretermenu->addAction(guileLoad);
+ connect(guileLoad, &QAction::triggered,
+ [&]() {
+ QString fileName = QFileDialog::getOpenFileName(this, tr("Open Script"), "",
+ tr("Binaries") + " (*." +
+ interpreter["GUILE"]->fileExtension().c_str() + ")");
+ std::stringstream a, b;
+ std::string c;
+ interpreter["GUILE"]->loadFile(fileName.toStdString(), a, b, c);
+ });
listWidget = new QTreeWidget();
listWidget->setColumnCount(1);