Mercurial > octave
view libgui/src/interpreter-qobject.cc @ 31808:90621682cc03
maint: Remove unnecessary indent after OCTAVE_BEGIN_NAMESPACE in libgui/
* BaseControl.cc, BaseControl.h, ButtonControl.cc, ButtonControl.h,
ButtonGroup.cc, ButtonGroup.h, Canvas.cc, Canvas.h, CheckBoxControl.cc,
CheckBoxControl.h, Container.cc, Container.h, ContextMenu.cc, ContextMenu.h,
EditControl.cc, EditControl.h, Figure.cc, Figure.h, GLCanvas.cc, GLCanvas.h,
ListBoxControl.cc, ListBoxControl.h, Menu.cc, Menu.h, Object.cc, Object.h,
Panel.cc, Panel.h, PopupMenuControl.cc, PopupMenuControl.h,
PushButtonControl.cc, PushButtonControl.h, PushTool.cc, PushTool.h,
RadioButtonControl.cc, RadioButtonControl.h, SliderControl.cc, SliderControl.h,
Table.cc, Table.h, TextControl.cc, TextControl.h, ToggleButtonControl.cc,
ToggleButtonControl.h, ToggleTool.cc, ToggleTool.h, ToolBar.cc, ToolBar.h,
ToolBarButton.cc, ToolBarButton.h, qt-graphics-toolkit.cc,
qt-graphics-toolkit.h, command-widget.cc, command-widget.h, community-news.cc,
community-news.h, dialog.cc, dialog.h, documentation-bookmarks.cc,
documentation-bookmarks.h, documentation-dock-widget.cc,
documentation-dock-widget.h, documentation.cc, documentation.h,
dw-main-window.cc, dw-main-window.h, external-editor-interface.cc,
external-editor-interface.h, files-dock-widget.cc, files-dock-widget.h,
find-files-dialog.cc, find-files-dialog.h, graphics-init.cc, graphics-init.h,
gui-settings.cc, gui-settings.h, history-dock-widget.cc, history-dock-widget.h,
interpreter-qobject.cc, file-editor-interface.h, file-editor-tab.cc,
file-editor-tab.h, file-editor.cc, file-editor.h, find-dialog.cc,
find-dialog.h, octave-qscintilla.cc, main-window.cc, main-window.h,
news-reader.cc, news-reader.h, octave-dock-widget.cc, octave-dock-widget.h,
octave-qobject.cc, qt-application.cc, qt-application.h,
qt-interpreter-events.cc, qt-interpreter-events.h, release-notes.cc,
release-notes.h, set-path-dialog.cc, set-path-dialog.h, settings-dialog.cc,
settings-dialog.h, terminal-dock-widget.cc, terminal-dock-widget.h,
variable-editor.cc, variable-editor.h, welcome-wizard.cc, welcome-wizard.h,
workspace-model.cc, workspace-model.h, workspace-view.cc, workspace-view.h:
maint: Remove unnecessary indent after OCTAVE_BEGIN_NAMESPACE in libgui/
author | Rik <rik@octave.org> |
---|---|
date | Thu, 02 Feb 2023 12:25:51 -0800 |
parents | 21f9b34eb893 |
children | 094a296b3ba1 2e484f9f1f18 |
line wrap: on
line source
//////////////////////////////////////////////////////////////////////// // // Copyright (C) 2011-2023 The Octave Project Developers // // See the file COPYRIGHT.md in the top-level directory of this // distribution or <https://octave.org/copyright/>. // // This file is part of Octave. // // Octave is free software: you can redistribute it and/or modify it // under the terms of the GNU General Public License as published by // the Free Software Foundation, either version 3 of the License, or // (at your option) any later version. // // Octave is distributed in the hope that it will be useful, but // WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with Octave; see the file COPYING. If not, see // <https://www.gnu.org/licenses/>. // //////////////////////////////////////////////////////////////////////// #if defined (HAVE_CONFIG_H) # include "config.h" #endif #include "interpreter-qobject.h" #include "octave-qobject.h" #include "qt-application.h" #include "qt-interpreter-events.h" #include "graphics-init.h" #include "input.h" #include "interpreter.h" OCTAVE_BEGIN_NAMESPACE(octave) interpreter_qobject::interpreter_qobject (base_qobject& oct_qobj) : QObject (), m_octave_qobj (oct_qobj), m_interpreter (nullptr) { } void interpreter_qobject::execute () { // The Octave application context owns the interpreter. qt_application& app_context = m_octave_qobj.app_context (); interpreter& interp = app_context.create_interpreter (); event_manager& evmgr = interp.get_event_manager (); evmgr.connect_link (m_octave_qobj.get_qt_interpreter_events ()); evmgr.install_qt_event_handlers (m_octave_qobj.get_qt_interpreter_events ()); evmgr.enable (); int exit_status = 0; try { // Final initialization. interp.initialize (); if (app_context.start_gui_p () && ! m_octave_qobj.experimental_terminal_widget ()) { interp.PS1 (">> "); interp.PS2 (""); } if (interp.initialized ()) { // The interpreter should be completely ready at this point so let // the GUI know. m_interpreter = &interp; emit ready (); graphics_init (interp); // Start executing commands in the command window. exit_status = interp.execute (); } } catch (const exit_exception& xe) { exit_status = xe.exit_status (); } // FIXME: The following comment doesn't seem to make sense now. // Signal that the interpreter is done executing code in the // main REPL, from script files, or command line eval arguments. // By using a signal here, we give the GUI a chance to process // any pending events, then signal that it is safe to shutdown // the interpreter. Our notification here allows the GUI to // insert the request to shutdown the interpreter in the event // queue after any other pending signals. The application // context owns the interpreter and will be responsible for // deleting it later, when the application object destructor is // executed. emit shutdown_finished (exit_status); } void interpreter_qobject::interpreter_event (const fcn_callback& fcn) { if (! m_interpreter) return; event_manager& evmgr = m_interpreter->get_event_manager (); evmgr.post_event (fcn); } void interpreter_qobject::interpreter_event (const meth_callback& meth) { if (! m_interpreter) return; event_manager& evmgr = m_interpreter->get_event_manager (); evmgr.post_event (meth); } void interpreter_qobject::interrupt () { if (! m_interpreter) return; // The following is a direct function call across threads. // We need to ensure that it uses thread-safe functions. m_interpreter->interrupt (); } void interpreter_qobject::pause () { // FIXME: Should we make this action work with the old terminal // widget? if (m_octave_qobj.experimental_terminal_widget ()) { if (! m_interpreter) return; // The following is a direct function call across threads. // We need to ensure that it uses thread-safe functions. m_interpreter->pause (); } } void interpreter_qobject::stop () { // FIXME: Should we make this action work with the old terminal // widget? if (m_octave_qobj.experimental_terminal_widget ()) { if (! m_interpreter) return; // The following is a direct function call across threads. // We need to ensure that it uses thread-safe functions. m_interpreter->stop (); } } void interpreter_qobject::resume () { // FIXME: Should we make this action work with the old terminal // widget? if (m_octave_qobj.experimental_terminal_widget ()) { // FIXME: This action should only be available when the // interpreter is paused. interpreter_event ([=] (interpreter& interp) { // INTERPRETER THREAD interp.resume (); }); } } qt_interpreter_events *interpreter_qobject::qt_link () { return m_octave_qobj.qt_link (); } OCTAVE_END_NAMESPACE(octave)