Renamed `VDBWindowsDebuggerConole*` to `VDBSimpleDebuggerConsole*`
as ot may be used on other scenarios than running on Windows, for example
when GDB is run on remote machine through SSH or when using generic
`GDBRemoteProcess`.
--- a/Make.proto Wed Nov 28 14:08:58 2018 +0000
+++ b/Make.proto Wed Dec 12 16:35:20 2018 +0000
@@ -142,10 +142,10 @@
$(OUTDIR)VDBIconLibrary.$(O) VDBIconLibrary.$(C) VDBIconLibrary.$(H): VDBIconLibrary.st $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(STCHDR)
$(OUTDIR)VDBInstructionBasicBlock.$(O) VDBInstructionBasicBlock.$(C) VDBInstructionBasicBlock.$(H): VDBInstructionBasicBlock.st $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(STCHDR)
$(OUTDIR)VDBSettingsApplication.$(O) VDBSettingsApplication.$(C) VDBSettingsApplication.$(H): VDBSettingsApplication.st $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libtool/AbstractSettingsApplication.$(H) $(INCLUDE_TOP)/stx/libview2/ApplicationModel.$(H) $(INCLUDE_TOP)/stx/libview2/Model.$(H) $(STCHDR)
+$(OUTDIR)VDBSimpleDebuggerConsoleView.$(O) VDBSimpleDebuggerConsoleView.$(C) VDBSimpleDebuggerConsoleView.$(H): VDBSimpleDebuggerConsoleView.st $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libview/DisplaySurface.$(H) $(INCLUDE_TOP)/stx/libview/GraphicsMedium.$(H) $(INCLUDE_TOP)/stx/libview/SimpleView.$(H) $(INCLUDE_TOP)/stx/libview/View.$(H) $(INCLUDE_TOP)/stx/libwidg/EditTextView.$(H) $(INCLUDE_TOP)/stx/libwidg/ListView.$(H) $(INCLUDE_TOP)/stx/libwidg/TextCollector.$(H) $(INCLUDE_TOP)/stx/libwidg/TextView.$(H) $(INCLUDE_TOP)/stx/libwidg2/TerminalView.$(H) $(STCHDR)
$(OUTDIR)VDBStartup.$(O) VDBStartup.$(C) VDBStartup.$(H): VDBStartup.st $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libbasic/StandaloneStartup.$(H) $(STCHDR)
$(OUTDIR)VDBVirtualMemoryMap.$(O) VDBVirtualMemoryMap.$(C) VDBVirtualMemoryMap.$(H): VDBVirtualMemoryMap.st $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(STCHDR)
$(OUTDIR)VDBVirtualMemoryRegion.$(O) VDBVirtualMemoryRegion.$(C) VDBVirtualMemoryRegion.$(H): VDBVirtualMemoryRegion.st $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(STCHDR)
-$(OUTDIR)VDBWindowsDebuggerConsoleView.$(O) VDBWindowsDebuggerConsoleView.$(C) VDBWindowsDebuggerConsoleView.$(H): VDBWindowsDebuggerConsoleView.st $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libview/DisplaySurface.$(H) $(INCLUDE_TOP)/stx/libview/GraphicsMedium.$(H) $(INCLUDE_TOP)/stx/libview/SimpleView.$(H) $(INCLUDE_TOP)/stx/libview/View.$(H) $(INCLUDE_TOP)/stx/libwidg/EditTextView.$(H) $(INCLUDE_TOP)/stx/libwidg/ListView.$(H) $(INCLUDE_TOP)/stx/libwidg/TextCollector.$(H) $(INCLUDE_TOP)/stx/libwidg/TextView.$(H) $(INCLUDE_TOP)/stx/libwidg2/TerminalView.$(H) $(STCHDR)
$(OUTDIR)jv_vdb.$(O) jv_vdb.$(C) jv_vdb.$(H): jv_vdb.st $(INCLUDE_TOP)/stx/libbasic/LibraryDefinition.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libbasic/ProjectDefinition.$(H) $(STCHDR)
$(OUTDIR)RRExitEvent.$(O) RRExitEvent.$(C) RRExitEvent.$(H): RRExitEvent.st $(INCLUDE_TOP)/jv/vdb/RREvent.$(H) $(INCLUDE_TOP)/stx/goodies/announcements/Announcement.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(STCHDR)
$(OUTDIR)RRStartEvent.$(O) RRStartEvent.$(C) RRStartEvent.$(H): RRStartEvent.st $(INCLUDE_TOP)/jv/vdb/RREvent.$(H) $(INCLUDE_TOP)/stx/goodies/announcements/Announcement.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(STCHDR)
@@ -161,11 +161,11 @@
$(OUTDIR)VDBInstructionsAndSourcePresenter.$(O) VDBInstructionsAndSourcePresenter.$(C) VDBInstructionsAndSourcePresenter.$(H): VDBInstructionsAndSourcePresenter.st $(INCLUDE_TOP)/jv/vdb/VDBAbstractPresenter.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libwidg2/AbstractHierarchicalItem.$(H) $(INCLUDE_TOP)/stx/libwidg2/HierarchicalItem.$(H) $(STCHDR)
$(OUTDIR)VDBMemoryApplication.$(O) VDBMemoryApplication.$(C) VDBMemoryApplication.$(H): VDBMemoryApplication.st $(INCLUDE_TOP)/jv/vdb/VDBAbstractApplication.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libview2/ApplicationModel.$(H) $(INCLUDE_TOP)/stx/libview2/Model.$(H) $(STCHDR)
$(OUTDIR)VDBRegisterPresenter.$(O) VDBRegisterPresenter.$(C) VDBRegisterPresenter.$(H): VDBRegisterPresenter.st $(INCLUDE_TOP)/jv/vdb/VDBAbstractPresenter.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libwidg2/AbstractHierarchicalItem.$(H) $(INCLUDE_TOP)/stx/libwidg2/HierarchicalItem.$(H) $(STCHDR)
+$(OUTDIR)VDBSimpleDebuggerConsoleApplication.$(O) VDBSimpleDebuggerConsoleApplication.$(C) VDBSimpleDebuggerConsoleApplication.$(H): VDBSimpleDebuggerConsoleApplication.st $(INCLUDE_TOP)/jv/libgdbs/GDBCommandStatus.$(H) $(INCLUDE_TOP)/jv/vdb/VDBAbstractApplication.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libview2/ApplicationModel.$(H) $(INCLUDE_TOP)/stx/libview2/Model.$(H) $(STCHDR)
$(OUTDIR)VDBSourceApplication.$(O) VDBSourceApplication.$(C) VDBSourceApplication.$(H): VDBSourceApplication.st $(INCLUDE_TOP)/jv/vdb/VDBAbstractApplication.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libview2/ApplicationModel.$(H) $(INCLUDE_TOP)/stx/libview2/Model.$(H) $(STCHDR)
$(OUTDIR)VDBThreadGroupPresenter.$(O) VDBThreadGroupPresenter.$(C) VDBThreadGroupPresenter.$(H): VDBThreadGroupPresenter.st $(INCLUDE_TOP)/jv/vdb/VDBAbstractPresenter.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libwidg2/AbstractHierarchicalItem.$(H) $(INCLUDE_TOP)/stx/libwidg2/HierarchicalItem.$(H) $(STCHDR)
$(OUTDIR)VDBThreadPresenter.$(O) VDBThreadPresenter.$(C) VDBThreadPresenter.$(H): VDBThreadPresenter.st $(INCLUDE_TOP)/jv/vdb/VDBAbstractPresenter.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libwidg2/AbstractHierarchicalItem.$(H) $(INCLUDE_TOP)/stx/libwidg2/HierarchicalItem.$(H) $(STCHDR)
$(OUTDIR)VDBVariableObjectPresenter.$(O) VDBVariableObjectPresenter.$(C) VDBVariableObjectPresenter.$(H): VDBVariableObjectPresenter.st $(INCLUDE_TOP)/jv/vdb/VDBAbstractPresenter.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libwidg2/AbstractHierarchicalItem.$(H) $(INCLUDE_TOP)/stx/libwidg2/HierarchicalItem.$(H) $(STCHDR)
-$(OUTDIR)VDBWindowsDebuggerConsoleApplication.$(O) VDBWindowsDebuggerConsoleApplication.$(C) VDBWindowsDebuggerConsoleApplication.$(H): VDBWindowsDebuggerConsoleApplication.st $(INCLUDE_TOP)/jv/libgdbs/GDBCommandStatus.$(H) $(INCLUDE_TOP)/jv/vdb/VDBAbstractApplication.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libview2/ApplicationModel.$(H) $(INCLUDE_TOP)/stx/libview2/Model.$(H) $(STCHDR)
$(OUTDIR)VDBAbstractTreeApplication.$(O) VDBAbstractTreeApplication.$(C) VDBAbstractTreeApplication.$(H): VDBAbstractTreeApplication.st $(INCLUDE_TOP)/jv/vdb/VDBAbstractApplication.$(H) $(INCLUDE_TOP)/jv/vdb/VDBAbstractListApplication.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libview2/ApplicationModel.$(H) $(INCLUDE_TOP)/stx/libview2/Model.$(H) $(STCHDR)
$(OUTDIR)VDBBreakpointListApplication.$(O) VDBBreakpointListApplication.$(C) VDBBreakpointListApplication.$(H): VDBBreakpointListApplication.st $(INCLUDE_TOP)/jv/vdb/VDBAbstractApplication.$(H) $(INCLUDE_TOP)/jv/vdb/VDBAbstractListApplication.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libview2/ApplicationModel.$(H) $(INCLUDE_TOP)/stx/libview2/Model.$(H) $(STCHDR)
$(OUTDIR)VDBTabbingContainer.$(O) VDBTabbingContainer.$(C) VDBTabbingContainer.$(H): VDBTabbingContainer.st $(INCLUDE_TOP)/jv/vdb/VDBAbstractApplication.$(H) $(INCLUDE_TOP)/jv/vdb/VDBAbstractContainer.$(H) $(INCLUDE_TOP)/stx/libbasic/Object.$(H) $(INCLUDE_TOP)/stx/libview2/ApplicationModel.$(H) $(INCLUDE_TOP)/stx/libview2/Model.$(H) $(STCHDR)
--- a/Make.spec Wed Nov 28 14:08:58 2018 +0000
+++ b/Make.spec Wed Dec 12 16:35:20 2018 +0000
@@ -59,10 +59,10 @@
VDBIconLibrary \
VDBInstructionBasicBlock \
VDBSettingsApplication \
+ VDBSimpleDebuggerConsoleView \
VDBStartup \
VDBVirtualMemoryMap \
VDBVirtualMemoryRegion \
- VDBWindowsDebuggerConsoleView \
jv_vdb \
RRExitEvent \
RRStartEvent \
@@ -78,11 +78,11 @@
VDBInstructionsAndSourcePresenter \
VDBMemoryApplication \
VDBRegisterPresenter \
+ VDBSimpleDebuggerConsoleApplication \
VDBSourceApplication \
VDBThreadGroupPresenter \
VDBThreadPresenter \
VDBVariableObjectPresenter \
- VDBWindowsDebuggerConsoleApplication \
VDBAbstractTreeApplication \
VDBBreakpointListApplication \
VDBTabbingContainer \
@@ -108,10 +108,10 @@
$(OUTDIR)VDBIconLibrary.$(O) \
$(OUTDIR)VDBInstructionBasicBlock.$(O) \
$(OUTDIR)VDBSettingsApplication.$(O) \
+ $(OUTDIR)VDBSimpleDebuggerConsoleView.$(O) \
$(OUTDIR)VDBStartup.$(O) \
$(OUTDIR)VDBVirtualMemoryMap.$(O) \
$(OUTDIR)VDBVirtualMemoryRegion.$(O) \
- $(OUTDIR)VDBWindowsDebuggerConsoleView.$(O) \
$(OUTDIR)jv_vdb.$(O) \
$(OUTDIR)RRExitEvent.$(O) \
$(OUTDIR)RRStartEvent.$(O) \
@@ -127,11 +127,11 @@
$(OUTDIR)VDBInstructionsAndSourcePresenter.$(O) \
$(OUTDIR)VDBMemoryApplication.$(O) \
$(OUTDIR)VDBRegisterPresenter.$(O) \
+ $(OUTDIR)VDBSimpleDebuggerConsoleApplication.$(O) \
$(OUTDIR)VDBSourceApplication.$(O) \
$(OUTDIR)VDBThreadGroupPresenter.$(O) \
$(OUTDIR)VDBThreadPresenter.$(O) \
$(OUTDIR)VDBVariableObjectPresenter.$(O) \
- $(OUTDIR)VDBWindowsDebuggerConsoleApplication.$(O) \
$(OUTDIR)VDBAbstractTreeApplication.$(O) \
$(OUTDIR)VDBBreakpointListApplication.$(O) \
$(OUTDIR)VDBTabbingContainer.$(O) \
--- a/VDBDebuggerApplication.st Wed Nov 28 14:08:58 2018 +0000
+++ b/VDBDebuggerApplication.st Wed Dec 12 16:35:20 2018 +0000
@@ -1100,8 +1100,8 @@
pane := VDBTabbingContainer new.
OperatingSystem isMSWINDOWSlike ifTrue:[
- pane addApplication:VDBWindowsDebuggerConsoleApplication new.
- ] ifFalse:[
+ pane addApplication:VDBSimpleDebuggerConsoleApplication new.
+ ] ifFalse:[
pane addApplication:VDBUnixDebuggerConsoleApplication new.
pane addApplication:VDBUnixInferiorConsoleApplication new.
].
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/VDBSimpleDebuggerConsoleApplication.st Wed Dec 12 16:35:20 2018 +0000
@@ -0,0 +1,359 @@
+"
+jv:vdb - Visual / VM Debugger
+Copyright (C) 2015-now Jan Vrany
+
+This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License'
+
+You may find a full license text in LICENSE.txt or at http://creativecommons.org/licenses/by-nc/4.0/
+"
+"{ Package: 'jv:vdb' }"
+
+"{ NameSpace: Smalltalk }"
+
+VDBAbstractApplication subclass:#VDBSimpleDebuggerConsoleApplication
+ instanceVariableNames:'consoleView consoleInput consoleOutput consoleOutputLock
+ consoleProcess consolePrompt consolePromptPrinted
+ outstandingCommand outstandingCommandToken
+ outstandingCommandBlocker ignoreNextLogStreamEvent completing
+ completions'
+ classVariableNames:''
+ poolDictionaries:'GDBCommandStatus'
+ category:'VDB-UI-Console-Windows'
+!
+
+!VDBSimpleDebuggerConsoleApplication class methodsFor:'documentation'!
+
+copyright
+"
+jv:vdb - Visual / VM Debugger
+Copyright (C) 2015-now Jan Vrany
+
+This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License'
+
+You may find a full license text in LICENSE.txt or at http://creativecommons.org/licenses/by-nc/4.0/
+"
+!
+
+documentation
+""
+! !
+
+!VDBSimpleDebuggerConsoleApplication class methodsFor:'accessing'!
+
+defaultWindowTitle
+ ^ self resources string: 'Debugger Console'
+
+ "Created: / 08-01-2018 / 18:59:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 03-10-2018 / 15:39:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!VDBSimpleDebuggerConsoleApplication class methodsFor:'interface specs'!
+
+windowSpec
+ "This resource specification was automatically generated
+ by the UIPainter of ST/X."
+
+ "Do not manually edit this!! If it is corrupted,
+ the UIPainter may not be able to read the specification."
+
+ "
+ UIPainter new openOnClass:VDBConsoleApplication andSelector:#windowSpec
+ VDBConsoleApplication new openInterface:#windowSpec
+ VDBConsoleApplication open
+ "
+
+ <resource: #canvas>
+
+ ^
+ #(FullSpec
+ name: windowSpec
+ window:
+ (WindowSpec
+ label: 'Debugger Console'
+ name: 'Debugger Console'
+ min: (Point 10 10)
+ bounds: (Rectangle 0 0 782 332)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (ArbitraryComponentSpec
+ name: 'Console'
+ layout: (LayoutFrame 0 0 0 0 0 1 0 1)
+ hasBorder: false
+ component: consoleView
+ )
+ )
+
+ )
+ )
+
+ "Modified: / 09-06-2014 / 09:57:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!VDBSimpleDebuggerConsoleApplication class methodsFor:'plugIn spec'!
+
+aspectSelectors
+ "This resource specification was automatically generated
+ by the UIPainter of ST/X."
+
+ "Do not manually edit this. If it is corrupted,
+ the UIPainter may not be able to read the specification."
+
+ "Return a description of exported aspects;
+ these can be connected to aspects of an embedding application
+ (if this app is embedded in a subCanvas)."
+
+ ^ #(
+ #debuggerHolder
+ ).
+
+! !
+
+!VDBSimpleDebuggerConsoleApplication methodsFor:'actions'!
+
+postBuildConsoleView: aTextCollector
+ consoleView := aTextCollector scrolledView.
+ consoleView readOnly: true;
+ font: CodeView defaultFont;
+ foregroundColor: Color white
+ backgroundColor: Color black;
+ cursorForegroundColor: Color white
+ backgroundColor: Color white.
+
+ "Modified: / 08-01-2018 / 19:16:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!VDBSimpleDebuggerConsoleApplication methodsFor:'aspects'!
+
+consoleView
+ consoleView isNil ifTrue:[
+ consoleView := VDBSimpleDebuggerConsoleView new.
+ consoleView
+ font:self textFont;
+ foregroundColor:Color white backgroundColor:Color black;
+ cursorForegroundColor:Color white backgroundColor:Color white.
+ consoleView localEcho:true.
+ consoleView inputTranslateCRToNL:true.
+ consoleView lineEditMode:true.
+ consoleView inStream:consoleInput.
+ consoleView outStream:consoleOutput.
+ consoleView startReaderProcessWhenVisible.
+ ].
+ ^ consoleView
+
+ "Created: / 09-06-2014 / 10:11:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 04-04-2018 / 22:40:59 / jv"
+ "Modified: / 20-08-2018 / 10:19:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!VDBSimpleDebuggerConsoleApplication methodsFor:'event handling'!
+
+onCommandEvent: event
+ event command == outstandingCommand ifTrue:[
+ outstandingCommandToken := event token.
+ ignoreNextLogStreamEvent := true.
+ ].
+
+ "Created: / 06-06-2014 / 22:43:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 11-06-2014 / 12:35:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+onCommandResultEvent: event
+ outstandingCommandToken notNil ifTrue:[
+ event token == outstandingCommandToken ifTrue:[
+ "/ Check if command ended up with an error. If so,
+ "/ print the error message.
+ event result status == CommandStatusError ifTrue:[
+ self showCR: ('Error: %1 ' bindWith: (event result propertyAt: #msg)).
+ ] ifFalse:[
+ "/ Check if the command issues is actually a MI command,
+ "/ if so, print "Done" to the console since MI command don't
+ "/ provide user feedback.
+ outstandingCommand isMICommand ifTrue:[
+ self showCR: ('Done ( %1 , see even log for result value)' bindWith: outstandingCommand value)
+ ].
+ ].
+ outstandingCommand := outstandingCommandToken := nil.
+ outstandingCommandBlocker signalForAll.
+ ].
+ ].
+
+ "Created: / 06-06-2014 / 22:44:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 27-02-2015 / 13:01:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+onEventSetProcessingFinished: event
+ self showPrompt.
+
+ "Created: / 18-09-2014 / 23:11:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+onLogOutputEvent: event
+ completing ifTrue:[
+ self halt.
+ ] ifFalse:[
+ ignoreNextLogStreamEvent ifTrue:[
+ ignoreNextLogStreamEvent := false.
+ ] ifFalse:[
+ self onStreamOutputEvent: event
+ ]
+ ].
+
+ "Created: / 11-06-2014 / 12:37:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 16-09-2016 / 01:12:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 04-04-2018 / 22:50:14 / jv"
+!
+
+onStreamOutputEvent: event
+ completing ifTrue:[
+ completions addAll: event value asStringCollection.
+ ] ifFalse:[
+ consolePromptPrinted ifTrue:[ self showCR:'' ].
+ consolePromptPrinted := false.
+ event value asStringCollection do:[:line |
+ line notEmptyOrNil ifTrue:[
+ self showCR: line.
+ ].
+ ].
+ ].
+
+ "Created: / 11-06-2014 / 12:00:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 16-09-2016 / 01:11:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!VDBSimpleDebuggerConsoleApplication methodsFor:'hooks'!
+
+commonPostOpen
+ consoleProcess isNil ifTrue:[
+ consoleProcess :=
+ [
+ [
+ | cmdLine cmd |
+ self showPrompt.
+ cmdLine := consoleInput nextLine asString.
+ consolePromptPrinted := false.
+ self showCR: cmdLine.
+ cmdLine notEmptyOrNil ifTrue:[
+ cmd := (GDBMIParser on:cmdLine) parseCommand.
+ cmd isCLICommand ifTrue:[
+ cmd runOnBackground: true.
+ ].
+ outstandingCommand := cmd.
+ debugger send:cmd andWait:false.
+ outstandingCommandBlocker wait.
+ ]
+ ] loop.
+ ] newProcess.
+ consoleProcess name: 'VDB Debugger Console REPL loop'.
+ consoleProcess resume.
+ ].
+
+ "Created: / 10-06-2014 / 01:25:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 16-09-2016 / 00:42:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!VDBSimpleDebuggerConsoleApplication methodsFor:'initialization & release'!
+
+initialize
+ super initialize.
+
+ consoleInput := GDBInternalPipeStream new.
+ consoleOutput := GDBInternalPipeStream new.
+ consoleOutputLock := RecursionLock new.
+ consolePrompt := '(gdb) '.
+ consolePromptPrinted := false.
+ outstandingCommandBlocker := Semaphore new.
+ ignoreNextLogStreamEvent := false.
+ completing := false.
+
+ "Created: / 10-06-2014 / 01:23:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 16-09-2016 / 00:33:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 07-04-2018 / 23:13:27 / jv"
+!
+
+release
+ super release.
+ consoleProcess terminate.
+
+ "Created: / 10-06-2014 / 01:34:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+subscribe
+ "Register for debugger events. To be overrided by subclasses"
+
+ debugger announcer
+ when: GDBCommandEvent send: #onCommandEvent: to: self;
+ when: GDBCommandResultEvent send: #onCommandResultEvent: to: self;
+
+ when: GDBConsoleOutputEvent send: #onStreamOutputEvent: to: self;
+ when: GDBTargetOutputEvent send: #onStreamOutputEvent: to: self;
+ when: GDBLogOutputEvent send: #onLogOutputEvent: to: self;
+
+ when: GDBEventSetProcessingFinished send: #onEventSetProcessingFinished: to: self.
+
+ "Created: / 06-06-2014 / 21:26:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 18-09-2014 / 23:11:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!VDBSimpleDebuggerConsoleApplication methodsFor:'private'!
+
+completeLine: aString
+ | result |
+
+ (debugger inferiors allSatisfy:[:inferior | inferior isRunning]) ifTrue:[
+ consoleView flash.
+ ^ #()
+ ].
+
+ completing := true.
+ completions := OrderedCollection new.
+ [
+ result := debugger send: 'complete ', aString.
+ ] ensure:[
+ completing := false.
+ ].
+ self halt.
+
+ "Created: / 16-09-2016 / 01:09:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!VDBSimpleDebuggerConsoleApplication methodsFor:'private - writing'!
+
+show: aString
+ consoleOutputLock critical:[
+ consoleOutput nextPutAll: aString.
+ ].
+
+ "Created: / 11-06-2014 / 08:02:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 11-06-2014 / 11:53:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+showCR: aString
+ consoleOutputLock critical:[
+ consoleOutput nextPutAll: aString.
+ consoleOutput nextPut: Character nl.
+ consoleOutput nextPut: Character return.
+ ].
+
+ "Created: / 11-06-2014 / 08:02:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 11-06-2014 / 11:56:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+showPrompt
+ consolePromptPrinted ifFalse:[
+ self show: consolePrompt.
+ consolePromptPrinted := true.
+ ].
+
+ "Created: / 18-09-2014 / 23:18:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 04-04-2018 / 23:01:24 / jv"
+! !
+
+!VDBSimpleDebuggerConsoleApplication class methodsFor:'documentation'!
+
+version_HG
+
+ ^ '$Changeset: <not expanded> $'
+! !
+
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/VDBSimpleDebuggerConsoleView.st Wed Dec 12 16:35:20 2018 +0000
@@ -0,0 +1,106 @@
+"
+jv:vdb - Visual / VM Debugger
+Copyright (C) 2015-now Jan Vrany
+
+This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License'
+
+You may find a full license text in LICENSE.txt or at http://creativecommons.org/licenses/by-nc/4.0/
+"
+"{ Package: 'jv:vdb' }"
+
+"{ NameSpace: Smalltalk }"
+
+TerminalView subclass:#VDBSimpleDebuggerConsoleView
+ instanceVariableNames:'tabPressed completions'
+ classVariableNames:''
+ poolDictionaries:''
+ category:'VDB-UI-Console-Windows'
+!
+
+!VDBSimpleDebuggerConsoleView class methodsFor:'documentation'!
+
+copyright
+"
+jv:vdb - Visual / VM Debugger
+Copyright (C) 2015-now Jan Vrany
+
+This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License'
+
+You may find a full license text in LICENSE.txt or at http://creativecommons.org/licenses/by-nc/4.0/
+"
+! !
+
+!VDBSimpleDebuggerConsoleView methodsFor:'event handling'!
+
+keyPress:aKey x:x y:y
+ <resource: #keyboard (#Tab)>
+
+ inStream isNil ifTrue:[^ self].
+
+ "aKey == #Tab"false ifTrue:[
+ DebugKeyboard ifTrue:[
+ Transcript showCR:'----'; show:'keyPress:' ; showCR:aKey printString.
+ ].
+ tabPressed ifTrue:[
+ tabPressed := false.
+ ^ self doTabTab.
+ ] ifFalse:[
+ tabPressed := true.
+ ^ self doTab
+ ].
+ ].
+ tabPressed := false.
+ ^ super keyPress:aKey x:x y:y
+
+
+
+
+ "
+ DebugKeyboard := true
+ "
+
+ "Created: / 15-09-2016 / 23:55:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 16-09-2016 / 00:56:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 04-04-2018 / 22:57:53 / jv"
+! !
+
+!VDBSimpleDebuggerConsoleView methodsFor:'functions'!
+
+doTab
+"/ | line |
+"/
+"/ line := lineBuffer.
+"/ lineBuffer := nil.
+"/ self application completeLine: line.
+
+ "Created: / 15-09-2016 / 23:56:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 16-09-2016 / 01:09:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 04-04-2018 / 22:58:55 / jv"
+!
+
+doTabTab
+"/ self application completeShow
+
+ "Created: / 16-09-2016 / 00:56:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 04-04-2018 / 22:59:02 / jv"
+! !
+
+!VDBSimpleDebuggerConsoleView methodsFor:'initialization'!
+
+initialize
+ "Invoked when a new instance is created."
+
+ "/ please change as required (and remove this comment)
+ super initialize.
+ tabPressed := false.
+
+ "Modified: / 16-09-2016 / 00:55:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!VDBSimpleDebuggerConsoleView class methodsFor:'documentation'!
+
+version_HG
+
+ ^ '$Changeset: <not expanded> $'
+! !
+
--- a/VDBWindowsDebuggerConsoleApplication.st Wed Nov 28 14:08:58 2018 +0000
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,360 +0,0 @@
-"
-jv:vdb - Visual / VM Debugger
-Copyright (C) 2015-now Jan Vrany
-
-This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License'
-
-You may find a full license text in LICENSE.txt or at http://creativecommons.org/licenses/by-nc/4.0/
-"
-"{ Package: 'jv:vdb' }"
-
-"{ NameSpace: Smalltalk }"
-
-VDBAbstractApplication subclass:#VDBWindowsDebuggerConsoleApplication
- instanceVariableNames:'consoleView consoleInput consoleOutput consoleOutputLock
- consoleProcess consolePrompt consolePromptPrinted
- outstandingCommand outstandingCommandToken
- outstandingCommandBlocker ignoreNextLogStreamEvent completing
- completions'
- classVariableNames:''
- poolDictionaries:'GDBCommandStatus'
- category:'VDB-UI-Console-Windows'
-!
-
-!VDBWindowsDebuggerConsoleApplication class methodsFor:'documentation'!
-
-copyright
-"
-jv:vdb - Visual / VM Debugger
-Copyright (C) 2015-now Jan Vrany
-
-This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License'
-
-You may find a full license text in LICENSE.txt or at http://creativecommons.org/licenses/by-nc/4.0/
-"
-!
-
-documentation
-""
-! !
-
-!VDBWindowsDebuggerConsoleApplication class methodsFor:'accessing'!
-
-defaultWindowTitle
- ^ self resources string: 'Debugger Console'
-
- "Created: / 08-01-2018 / 18:59:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 03-10-2018 / 15:39:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
-!VDBWindowsDebuggerConsoleApplication class methodsFor:'interface specs'!
-
-windowSpec
- "This resource specification was automatically generated
- by the UIPainter of ST/X."
-
- "Do not manually edit this!! If it is corrupted,
- the UIPainter may not be able to read the specification."
-
- "
- UIPainter new openOnClass:VDBConsoleApplication andSelector:#windowSpec
- VDBConsoleApplication new openInterface:#windowSpec
- VDBConsoleApplication open
- "
-
- <resource: #canvas>
-
- ^
- #(FullSpec
- name: windowSpec
- window:
- (WindowSpec
- label: 'Debugger Console'
- name: 'Debugger Console'
- min: (Point 10 10)
- bounds: (Rectangle 0 0 782 332)
- )
- component:
- (SpecCollection
- collection: (
- (ArbitraryComponentSpec
- name: 'Console'
- layout: (LayoutFrame 0 0 0 0 0 1 0 1)
- hasBorder: false
- component: consoleView
- )
- )
-
- )
- )
-
- "Modified: / 09-06-2014 / 09:57:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
-!VDBWindowsDebuggerConsoleApplication class methodsFor:'plugIn spec'!
-
-aspectSelectors
- "This resource specification was automatically generated
- by the UIPainter of ST/X."
-
- "Do not manually edit this. If it is corrupted,
- the UIPainter may not be able to read the specification."
-
- "Return a description of exported aspects;
- these can be connected to aspects of an embedding application
- (if this app is embedded in a subCanvas)."
-
- ^ #(
- #debuggerHolder
- ).
-
-! !
-
-!VDBWindowsDebuggerConsoleApplication methodsFor:'actions'!
-
-postBuildConsoleView: aTextCollector
- consoleView := aTextCollector scrolledView.
- consoleView readOnly: true;
- font: CodeView defaultFont;
- foregroundColor: Color white
- backgroundColor: Color black;
- cursorForegroundColor: Color white
- backgroundColor: Color white.
-
- "Modified: / 08-01-2018 / 19:16:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
-!VDBWindowsDebuggerConsoleApplication methodsFor:'aspects'!
-
-consoleView
- consoleView isNil ifTrue:[
- consoleView := VDBWindowsDebuggerConsoleView new.
- consoleView font: self textFont;
- foregroundColor: Color white
- backgroundColor: Color black;
- cursorForegroundColor: Color white
- backgroundColor: Color white.
- consoleView localEcho:true.
- consoleView inputTranslateCRToNL:true.
- consoleView lineEditMode:true.
- consoleView inStream:consoleInput.
- consoleView outStream:consoleOutput.
- consoleView startReaderProcessWhenVisible.
- ].
- ^ consoleView
-
- "Created: / 09-06-2014 / 10:11:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 04-04-2018 / 22:40:59 / jv"
- "Modified: / 20-08-2018 / 10:19:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
-!VDBWindowsDebuggerConsoleApplication methodsFor:'event handling'!
-
-onCommandEvent: event
- event command == outstandingCommand ifTrue:[
- outstandingCommandToken := event token.
- ignoreNextLogStreamEvent := true.
- ].
-
- "Created: / 06-06-2014 / 22:43:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 11-06-2014 / 12:35:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
-onCommandResultEvent: event
- outstandingCommandToken notNil ifTrue:[
- event token == outstandingCommandToken ifTrue:[
- "/ Check if command ended up with an error. If so,
- "/ print the error message.
- event result status == CommandStatusError ifTrue:[
- self showCR: ('Error: %1 ' bindWith: (event result propertyAt: #msg)).
- ] ifFalse:[
- "/ Check if the command issues is actually a MI command,
- "/ if so, print "Done" to the console since MI command don't
- "/ provide user feedback.
- outstandingCommand isMICommand ifTrue:[
- self showCR: ('Done ( %1 , see even log for result value)' bindWith: outstandingCommand value)
- ].
- ].
- outstandingCommand := outstandingCommandToken := nil.
- outstandingCommandBlocker signalForAll.
- ].
- ].
-
- "Created: / 06-06-2014 / 22:44:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 27-02-2015 / 13:01:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
-onEventSetProcessingFinished: event
- self showPrompt.
-
- "Created: / 18-09-2014 / 23:11:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
-onLogOutputEvent: event
- completing ifTrue:[
- self halt.
- ] ifFalse:[
- ignoreNextLogStreamEvent ifTrue:[
- ignoreNextLogStreamEvent := false.
- ] ifFalse:[
- self onStreamOutputEvent: event
- ]
- ].
-
- "Created: / 11-06-2014 / 12:37:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 16-09-2016 / 01:12:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 04-04-2018 / 22:50:14 / jv"
-!
-
-onStreamOutputEvent: event
- completing ifTrue:[
- completions addAll: event value asStringCollection.
- ] ifFalse:[
- consolePromptPrinted ifTrue:[ self showCR:'' ].
- consolePromptPrinted := false.
- event value asStringCollection do:[:line |
- line notEmptyOrNil ifTrue:[
- self showCR: line.
- ].
- ].
- ].
-
- "Created: / 11-06-2014 / 12:00:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 16-09-2016 / 01:11:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
-!VDBWindowsDebuggerConsoleApplication methodsFor:'hooks'!
-
-commonPostOpen
- consoleProcess isNil ifTrue:[
- consoleProcess :=
- [
- [
- | cmdLine cmd |
- self showPrompt.
- cmdLine := consoleInput nextLine asString.
- consolePromptPrinted := false.
- self showCR: cmdLine.
- cmdLine notEmptyOrNil ifTrue:[
- cmd := (GDBMIParser on:cmdLine) parseCommand.
- cmd isCLICommand ifTrue:[
- cmd runOnBackground: true.
- ].
- outstandingCommand := cmd.
- debugger send:cmd andWait:false.
- outstandingCommandBlocker wait.
- ]
- ] loop.
- ] newProcess.
- consoleProcess name: 'VDB Debugger Console REPL loop'.
- consoleProcess resume.
- ].
-
- "Created: / 10-06-2014 / 01:25:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 16-09-2016 / 00:42:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
-!VDBWindowsDebuggerConsoleApplication methodsFor:'initialization & release'!
-
-initialize
- super initialize.
-
- consoleInput := GDBInternalPipeStream new.
- consoleOutput := GDBInternalPipeStream new.
- consoleOutputLock := RecursionLock new.
- consolePrompt := '(gdb) '.
- consolePromptPrinted := false.
- outstandingCommandBlocker := Semaphore new.
- ignoreNextLogStreamEvent := false.
- completing := false.
-
- "Created: / 10-06-2014 / 01:23:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 16-09-2016 / 00:33:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 07-04-2018 / 23:13:27 / jv"
-!
-
-release
- super release.
- consoleProcess terminate.
-
- "Created: / 10-06-2014 / 01:34:23 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
-subscribe
- "Register for debugger events. To be overrided by subclasses"
-
- debugger announcer
- when: GDBCommandEvent send: #onCommandEvent: to: self;
- when: GDBCommandResultEvent send: #onCommandResultEvent: to: self;
-
- when: GDBConsoleOutputEvent send: #onStreamOutputEvent: to: self;
- when: GDBTargetOutputEvent send: #onStreamOutputEvent: to: self;
- when: GDBLogOutputEvent send: #onLogOutputEvent: to: self;
-
- when: GDBEventSetProcessingFinished send: #onEventSetProcessingFinished: to: self.
-
- "Created: / 06-06-2014 / 21:26:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 18-09-2014 / 23:11:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
-!VDBWindowsDebuggerConsoleApplication methodsFor:'private'!
-
-completeLine: aString
- | result |
-
- (debugger inferiors allSatisfy:[:inferior | inferior isRunning]) ifTrue:[
- consoleView flash.
- ^ #()
- ].
-
- completing := true.
- completions := OrderedCollection new.
- [
- result := debugger send: 'complete ', aString.
- ] ensure:[
- completing := false.
- ].
- self halt.
-
- "Created: / 16-09-2016 / 01:09:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
-!VDBWindowsDebuggerConsoleApplication methodsFor:'private - writing'!
-
-show: aString
- consoleOutputLock critical:[
- consoleOutput nextPutAll: aString.
- ].
-
- "Created: / 11-06-2014 / 08:02:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 11-06-2014 / 11:53:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
-showCR: aString
- consoleOutputLock critical:[
- consoleOutput nextPutAll: aString.
- consoleOutput nextPut: Character nl.
- consoleOutput nextPut: Character return.
- ].
-
- "Created: / 11-06-2014 / 08:02:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 11-06-2014 / 11:56:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
-showPrompt
- consolePromptPrinted ifFalse:[
- self show: consolePrompt.
- consolePromptPrinted := true.
- ].
-
- "Created: / 18-09-2014 / 23:18:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 04-04-2018 / 23:01:24 / jv"
-! !
-
-!VDBWindowsDebuggerConsoleApplication class methodsFor:'documentation'!
-
-version_HG
-
- ^ '$Changeset: <not expanded> $'
-! !
-
--- a/VDBWindowsDebuggerConsoleView.st Wed Nov 28 14:08:58 2018 +0000
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,106 +0,0 @@
-"
-jv:vdb - Visual / VM Debugger
-Copyright (C) 2015-now Jan Vrany
-
-This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License'
-
-You may find a full license text in LICENSE.txt or at http://creativecommons.org/licenses/by-nc/4.0/
-"
-"{ Package: 'jv:vdb' }"
-
-"{ NameSpace: Smalltalk }"
-
-TerminalView subclass:#VDBWindowsDebuggerConsoleView
- instanceVariableNames:'tabPressed completions'
- classVariableNames:''
- poolDictionaries:''
- category:'VDB-UI-Console-Windows'
-!
-
-!VDBWindowsDebuggerConsoleView class methodsFor:'documentation'!
-
-copyright
-"
-jv:vdb - Visual / VM Debugger
-Copyright (C) 2015-now Jan Vrany
-
-This software is licensed under 'Creative Commons Attribution-NonCommercial 4.0 International License'
-
-You may find a full license text in LICENSE.txt or at http://creativecommons.org/licenses/by-nc/4.0/
-"
-! !
-
-!VDBWindowsDebuggerConsoleView methodsFor:'event handling'!
-
-keyPress:aKey x:x y:y
- <resource: #keyboard (#Tab)>
-
- inStream isNil ifTrue:[^ self].
-
- "aKey == #Tab"false ifTrue:[
- DebugKeyboard ifTrue:[
- Transcript showCR:'----'; show:'keyPress:' ; showCR:aKey printString.
- ].
- tabPressed ifTrue:[
- tabPressed := false.
- ^ self doTabTab.
- ] ifFalse:[
- tabPressed := true.
- ^ self doTab
- ].
- ].
- tabPressed := false.
- ^ super keyPress:aKey x:x y:y
-
-
-
-
- "
- DebugKeyboard := true
- "
-
- "Created: / 15-09-2016 / 23:55:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 16-09-2016 / 00:56:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 04-04-2018 / 22:57:53 / jv"
-! !
-
-!VDBWindowsDebuggerConsoleView methodsFor:'functions'!
-
-doTab
-"/ | line |
-"/
-"/ line := lineBuffer.
-"/ lineBuffer := nil.
-"/ self application completeLine: line.
-
- "Created: / 15-09-2016 / 23:56:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 16-09-2016 / 01:09:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 04-04-2018 / 22:58:55 / jv"
-!
-
-doTabTab
-"/ self application completeShow
-
- "Created: / 16-09-2016 / 00:56:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
- "Modified: / 04-04-2018 / 22:59:02 / jv"
-! !
-
-!VDBWindowsDebuggerConsoleView methodsFor:'initialization'!
-
-initialize
- "Invoked when a new instance is created."
-
- "/ please change as required (and remove this comment)
- super initialize.
- tabPressed := false.
-
- "Modified: / 16-09-2016 / 00:55:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
-!VDBWindowsDebuggerConsoleView class methodsFor:'documentation'!
-
-version_HG
-
- ^ '$Changeset: <not expanded> $'
-! !
-
--- a/abbrev.stc Wed Nov 28 14:08:58 2018 +0000
+++ b/abbrev.stc Wed Dec 12 16:35:20 2018 +0000
@@ -9,10 +9,10 @@
VDBIconLibrary VDBIconLibrary jv:vdb 'VDB-UI-Support' 0
VDBInstructionBasicBlock VDBInstructionBasicBlock jv:vdb 'VDB-UI-Support' 0
VDBSettingsApplication VDBSettingsApplication jv:vdb 'VDB-UI-Others' 2
+VDBSimpleDebuggerConsoleView VDBSimpleDebuggerConsoleView jv:vdb 'VDB-UI-Console-Windows' 2
VDBStartup VDBStartup jv:vdb 'VDB-UI' 1
VDBVirtualMemoryMap VDBVirtualMemoryMap jv:vdb 'VDB-Tools' 0
VDBVirtualMemoryRegion VDBVirtualMemoryRegion jv:vdb 'VDB-Tools' 0
-VDBWindowsDebuggerConsoleView VDBWindowsDebuggerConsoleView jv:vdb 'VDB-UI-Console-Windows' 2
jv_vdb jv_vdb jv:vdb '* Projects & Packages *' 3
RRExitEvent RRExitEvent jv:vdb 'RR' 0
RRStartEvent RRStartEvent jv:vdb 'RR' 0
@@ -28,11 +28,11 @@
VDBInstructionsAndSourcePresenter VDBInstructionsAndSourcePresenter jv:vdb 'VDB-Presentation' 0
VDBMemoryApplication VDBMemoryApplication jv:vdb 'VDB-UI-Others' 2
VDBRegisterPresenter VDBRegisterPresenter jv:vdb 'VDB-Presentation' 0
+VDBSimpleDebuggerConsoleApplication VDBSimpleDebuggerConsoleApplication jv:vdb 'VDB-UI-Console-Windows' 2
VDBSourceApplication VDBSourceApplication jv:vdb 'VDB-UI-Source' 2
VDBThreadGroupPresenter VDBThreadGroupPresenter jv:vdb 'VDB-Presentation' 0
VDBThreadPresenter VDBThreadPresenter jv:vdb 'VDB-Presentation' 0
VDBVariableObjectPresenter VDBVariableObjectPresenter jv:vdb 'VDB-Presentation' 0
-VDBWindowsDebuggerConsoleApplication VDBWindowsDebuggerConsoleApplication jv:vdb 'VDB-UI-Console-Windows' 2
VDBAbstractTreeApplication VDBAbstractTreeApplication jv:vdb 'VDB-UI-Abstract' 2
VDBBreakpointListApplication VDBBreakpointListApplication jv:vdb 'VDB-UI-Others' 2
VDBTabbingContainer VDBTabbingContainer jv:vdb 'VDB-UI-Containers' 2
--- a/application/Make.proto Wed Nov 28 14:08:58 2018 +0000
+++ b/application/Make.proto Wed Dec 12 16:35:20 2018 +0000
@@ -69,7 +69,6 @@
libstx_libview \
libstx_libui \
libstx_libview2 \
- libstx_goodies_sunit \
libstx_libwidg \
libstx_goodies_magritte \
libstx_libhtml \
@@ -92,7 +91,6 @@
$(TOP)/libview/libstx_libview$(O_EXT) \
$(TOP)/libui/libstx_libui$(O_EXT) \
$(TOP)/libview2/libstx_libview2$(O_EXT) \
- $(TOP)/goodies/sunit/libstx_goodies_sunit$(O_EXT) \
$(TOP)/libwidg/libstx_libwidg$(O_EXT) \
$(TOP)/goodies/magritte/libstx_goodies_magritte$(O_EXT) \
$(TOP)/libhtml/libstx_libhtml$(O_EXT) \
@@ -115,7 +113,6 @@
libstx_libview$(O_EXT) \
libstx_libui$(O_EXT) \
libstx_libview2$(O_EXT) \
- libstx_goodies_sunit$(O_EXT) \
libstx_libwidg$(O_EXT) \
libstx_goodies_magritte$(O_EXT) \
libstx_libhtml$(O_EXT) \
@@ -440,19 +437,6 @@
$(TOP)/libview2/makefile: $(TOP)/libview2/Make.proto
$(TOP)/rules/stmkmf --cd $(TOP)/libview2
-libstx_goodies_sunit.so: $(TOP)/goodies/sunit/libstx_goodies_sunit.so
- ln -sf $(TOP)/goodies/sunit/libstx_goodies_sunit.so .
-
-$(TOP)/goodies/sunit/libstx_goodies_sunit.so: $(TOP)/goodies/sunit/makefile $(FORCE)
- @if [ -f "$(TOP)/goodies/sunit/.NOSOURCE" ]; then \
- echo "skip make in $(TOP)/goodies/sunit (no source)"; \
- else \
- cd $(TOP)/goodies/sunit && $(MAKE) "CFLAGS_LOCAL=$(GLOBALDEFINES) "; \
- fi
-
-$(TOP)/goodies/sunit/makefile: $(TOP)/goodies/sunit/Make.proto
- $(TOP)/rules/stmkmf --cd $(TOP)/goodies/sunit
-
libstx_libwidg.so: $(TOP)/libwidg/libstx_libwidg.so
ln -sf $(TOP)/libwidg/libstx_libwidg.so .
--- a/application/bc.mak Wed Nov 28 14:08:58 2018 +0000
+++ b/application/bc.mak Wed Dec 12 16:35:20 2018 +0000
@@ -96,7 +96,6 @@
libstx_libview.dll \
libstx_libui.dll \
libstx_libview2.dll \
- libstx_goodies_sunit.dll \
libstx_libwidg.dll \
libstx_goodies_magritte.dll \
libstx_libhtml.dll \
@@ -367,12 +366,6 @@
..\..\..\stx\libview2\$(OBJDIR)\libstx_libview2.dll: $(FORCE)
pushd ..\..\..\stx\libview2 & $(MAKE_BAT) "CFLAGS_LOCAL=$(GLOBALDEFINES) "
-libstx_goodies_sunit.dll: ..\..\..\stx\goodies\sunit\$(OBJDIR)\libstx_goodies_sunit.dll
- copy ..\..\..\stx\goodies\sunit\$(OBJDIR)\libstx_goodies_sunit.dll *.*
-
-..\..\..\stx\goodies\sunit\$(OBJDIR)\libstx_goodies_sunit.dll: $(FORCE)
- pushd ..\..\..\stx\goodies\sunit & $(MAKE_BAT) "CFLAGS_LOCAL=$(GLOBALDEFINES) "
-
libstx_libwidg.dll: ..\..\..\stx\libwidg\$(OBJDIR)\libstx_libwidg.dll
copy ..\..\..\stx\libwidg\$(OBJDIR)\libstx_libwidg.dll *.*
--- a/application/builder/baseline.rbspec Wed Nov 28 14:08:58 2018 +0000
+++ b/application/builder/baseline.rbspec Wed Dec 12 16:35:20 2018 +0000
@@ -24,7 +24,6 @@
package "stx:libview"
package "stx:libui"
package "stx:libview2"
- package "stx:goodies/sunit"
package "stx:libwidg"
package "stx:goodies/magritte"
package "stx:libhtml"
--- a/application/builder/package.deps.rake Wed Nov 28 14:08:58 2018 +0000
+++ b/application/builder/package.deps.rake Wed Dec 12 16:35:20 2018 +0000
@@ -22,9 +22,6 @@
task "stx:goodies/regex" => "stx:libbasic"
-task "stx:goodies/sunit" => "stx:libbasic"
-task "stx:goodies/sunit" => "stx:libview2"
-
task "stx:goodies/xml/vw" => "stx:libbasic"
@@ -88,7 +85,6 @@
task "jv:vdb/application" => "stx:goodies/magritte"
task "jv:vdb/application" => "stx:goodies/refactoryBrowser/parser"
task "jv:vdb/application" => "stx:goodies/regex"
-task "jv:vdb/application" => "stx:goodies/sunit"
task "jv:vdb/application" => "stx:goodies/xml/vw"
task "jv:vdb/application" => "stx:libbasic"
task "jv:vdb/application" => "stx:libbasic2"
--- a/application/modules.stx Wed Nov 28 14:08:58 2018 +0000
+++ b/application/modules.stx Wed Dec 12 16:35:20 2018 +0000
@@ -25,7 +25,6 @@
libstx_libview
libstx_libui
libstx_libview2
-libstx_goodies_sunit
libstx_libwidg
libstx_goodies_magritte
libstx_libhtml
--- a/bc.mak Wed Nov 28 14:08:58 2018 +0000
+++ b/bc.mak Wed Dec 12 16:35:20 2018 +0000
@@ -89,10 +89,10 @@
$(OUTDIR)VDBIconLibrary.$(O) VDBIconLibrary.$(C) VDBIconLibrary.$(H): VDBIconLibrary.st $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(STCHDR)
$(OUTDIR)VDBInstructionBasicBlock.$(O) VDBInstructionBasicBlock.$(C) VDBInstructionBasicBlock.$(H): VDBInstructionBasicBlock.st $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(STCHDR)
$(OUTDIR)VDBSettingsApplication.$(O) VDBSettingsApplication.$(C) VDBSettingsApplication.$(H): VDBSettingsApplication.st $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libtool\AbstractSettingsApplication.$(H) $(INCLUDE_TOP)\stx\libview2\ApplicationModel.$(H) $(INCLUDE_TOP)\stx\libview2\Model.$(H) $(STCHDR)
+$(OUTDIR)VDBSimpleDebuggerConsoleView.$(O) VDBSimpleDebuggerConsoleView.$(C) VDBSimpleDebuggerConsoleView.$(H): VDBSimpleDebuggerConsoleView.st $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libview\DisplaySurface.$(H) $(INCLUDE_TOP)\stx\libview\GraphicsMedium.$(H) $(INCLUDE_TOP)\stx\libview\SimpleView.$(H) $(INCLUDE_TOP)\stx\libview\View.$(H) $(INCLUDE_TOP)\stx\libwidg\EditTextView.$(H) $(INCLUDE_TOP)\stx\libwidg\ListView.$(H) $(INCLUDE_TOP)\stx\libwidg\TextCollector.$(H) $(INCLUDE_TOP)\stx\libwidg\TextView.$(H) $(INCLUDE_TOP)\stx\libwidg2\TerminalView.$(H) $(STCHDR)
$(OUTDIR)VDBStartup.$(O) VDBStartup.$(C) VDBStartup.$(H): VDBStartup.st $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libbasic\StandaloneStartup.$(H) $(STCHDR)
$(OUTDIR)VDBVirtualMemoryMap.$(O) VDBVirtualMemoryMap.$(C) VDBVirtualMemoryMap.$(H): VDBVirtualMemoryMap.st $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(STCHDR)
$(OUTDIR)VDBVirtualMemoryRegion.$(O) VDBVirtualMemoryRegion.$(C) VDBVirtualMemoryRegion.$(H): VDBVirtualMemoryRegion.st $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(STCHDR)
-$(OUTDIR)VDBWindowsDebuggerConsoleView.$(O) VDBWindowsDebuggerConsoleView.$(C) VDBWindowsDebuggerConsoleView.$(H): VDBWindowsDebuggerConsoleView.st $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libview\DisplaySurface.$(H) $(INCLUDE_TOP)\stx\libview\GraphicsMedium.$(H) $(INCLUDE_TOP)\stx\libview\SimpleView.$(H) $(INCLUDE_TOP)\stx\libview\View.$(H) $(INCLUDE_TOP)\stx\libwidg\EditTextView.$(H) $(INCLUDE_TOP)\stx\libwidg\ListView.$(H) $(INCLUDE_TOP)\stx\libwidg\TextCollector.$(H) $(INCLUDE_TOP)\stx\libwidg\TextView.$(H) $(INCLUDE_TOP)\stx\libwidg2\TerminalView.$(H) $(STCHDR)
$(OUTDIR)jv_vdb.$(O) jv_vdb.$(C) jv_vdb.$(H): jv_vdb.st $(INCLUDE_TOP)\stx\libbasic\LibraryDefinition.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libbasic\ProjectDefinition.$(H) $(STCHDR)
$(OUTDIR)RRExitEvent.$(O) RRExitEvent.$(C) RRExitEvent.$(H): RRExitEvent.st $(INCLUDE_TOP)\jv\vdb\RREvent.$(H) $(INCLUDE_TOP)\stx\goodies\announcements\Announcement.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(STCHDR)
$(OUTDIR)RRStartEvent.$(O) RRStartEvent.$(C) RRStartEvent.$(H): RRStartEvent.st $(INCLUDE_TOP)\jv\vdb\RREvent.$(H) $(INCLUDE_TOP)\stx\goodies\announcements\Announcement.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(STCHDR)
@@ -108,11 +108,11 @@
$(OUTDIR)VDBInstructionsAndSourcePresenter.$(O) VDBInstructionsAndSourcePresenter.$(C) VDBInstructionsAndSourcePresenter.$(H): VDBInstructionsAndSourcePresenter.st $(INCLUDE_TOP)\jv\vdb\VDBAbstractPresenter.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libwidg2\AbstractHierarchicalItem.$(H) $(INCLUDE_TOP)\stx\libwidg2\HierarchicalItem.$(H) $(STCHDR)
$(OUTDIR)VDBMemoryApplication.$(O) VDBMemoryApplication.$(C) VDBMemoryApplication.$(H): VDBMemoryApplication.st $(INCLUDE_TOP)\jv\vdb\VDBAbstractApplication.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libview2\ApplicationModel.$(H) $(INCLUDE_TOP)\stx\libview2\Model.$(H) $(STCHDR)
$(OUTDIR)VDBRegisterPresenter.$(O) VDBRegisterPresenter.$(C) VDBRegisterPresenter.$(H): VDBRegisterPresenter.st $(INCLUDE_TOP)\jv\vdb\VDBAbstractPresenter.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libwidg2\AbstractHierarchicalItem.$(H) $(INCLUDE_TOP)\stx\libwidg2\HierarchicalItem.$(H) $(STCHDR)
+$(OUTDIR)VDBSimpleDebuggerConsoleApplication.$(O) VDBSimpleDebuggerConsoleApplication.$(C) VDBSimpleDebuggerConsoleApplication.$(H): VDBSimpleDebuggerConsoleApplication.st $(INCLUDE_TOP)\jv\libgdbs\GDBCommandStatus.$(H) $(INCLUDE_TOP)\jv\vdb\VDBAbstractApplication.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libview2\ApplicationModel.$(H) $(INCLUDE_TOP)\stx\libview2\Model.$(H) $(STCHDR)
$(OUTDIR)VDBSourceApplication.$(O) VDBSourceApplication.$(C) VDBSourceApplication.$(H): VDBSourceApplication.st $(INCLUDE_TOP)\jv\vdb\VDBAbstractApplication.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libview2\ApplicationModel.$(H) $(INCLUDE_TOP)\stx\libview2\Model.$(H) $(STCHDR)
$(OUTDIR)VDBThreadGroupPresenter.$(O) VDBThreadGroupPresenter.$(C) VDBThreadGroupPresenter.$(H): VDBThreadGroupPresenter.st $(INCLUDE_TOP)\jv\vdb\VDBAbstractPresenter.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libwidg2\AbstractHierarchicalItem.$(H) $(INCLUDE_TOP)\stx\libwidg2\HierarchicalItem.$(H) $(STCHDR)
$(OUTDIR)VDBThreadPresenter.$(O) VDBThreadPresenter.$(C) VDBThreadPresenter.$(H): VDBThreadPresenter.st $(INCLUDE_TOP)\jv\vdb\VDBAbstractPresenter.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libwidg2\AbstractHierarchicalItem.$(H) $(INCLUDE_TOP)\stx\libwidg2\HierarchicalItem.$(H) $(STCHDR)
$(OUTDIR)VDBVariableObjectPresenter.$(O) VDBVariableObjectPresenter.$(C) VDBVariableObjectPresenter.$(H): VDBVariableObjectPresenter.st $(INCLUDE_TOP)\jv\vdb\VDBAbstractPresenter.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libwidg2\AbstractHierarchicalItem.$(H) $(INCLUDE_TOP)\stx\libwidg2\HierarchicalItem.$(H) $(STCHDR)
-$(OUTDIR)VDBWindowsDebuggerConsoleApplication.$(O) VDBWindowsDebuggerConsoleApplication.$(C) VDBWindowsDebuggerConsoleApplication.$(H): VDBWindowsDebuggerConsoleApplication.st $(INCLUDE_TOP)\jv\libgdbs\GDBCommandStatus.$(H) $(INCLUDE_TOP)\jv\vdb\VDBAbstractApplication.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libview2\ApplicationModel.$(H) $(INCLUDE_TOP)\stx\libview2\Model.$(H) $(STCHDR)
$(OUTDIR)VDBAbstractTreeApplication.$(O) VDBAbstractTreeApplication.$(C) VDBAbstractTreeApplication.$(H): VDBAbstractTreeApplication.st $(INCLUDE_TOP)\jv\vdb\VDBAbstractApplication.$(H) $(INCLUDE_TOP)\jv\vdb\VDBAbstractListApplication.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libview2\ApplicationModel.$(H) $(INCLUDE_TOP)\stx\libview2\Model.$(H) $(STCHDR)
$(OUTDIR)VDBBreakpointListApplication.$(O) VDBBreakpointListApplication.$(C) VDBBreakpointListApplication.$(H): VDBBreakpointListApplication.st $(INCLUDE_TOP)\jv\vdb\VDBAbstractApplication.$(H) $(INCLUDE_TOP)\jv\vdb\VDBAbstractListApplication.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libview2\ApplicationModel.$(H) $(INCLUDE_TOP)\stx\libview2\Model.$(H) $(STCHDR)
$(OUTDIR)VDBTabbingContainer.$(O) VDBTabbingContainer.$(C) VDBTabbingContainer.$(H): VDBTabbingContainer.st $(INCLUDE_TOP)\jv\vdb\VDBAbstractApplication.$(H) $(INCLUDE_TOP)\jv\vdb\VDBAbstractContainer.$(H) $(INCLUDE_TOP)\stx\libbasic\Object.$(H) $(INCLUDE_TOP)\stx\libview2\ApplicationModel.$(H) $(INCLUDE_TOP)\stx\libview2\Model.$(H) $(STCHDR)
--- a/jv_vdb.st Wed Nov 28 14:08:58 2018 +0000
+++ b/jv_vdb.st Wed Dec 12 16:35:20 2018 +0000
@@ -51,13 +51,13 @@
Please take a look at the #referencedPreRequisites method as well."
^ #(
- #'jv:libgdbs' "GDBCommandStatus - shared pool used by VDBWindowsDebuggerConsoleApplication"
+ #'jv:libgdbs' "GDBCommandStatus - shared pool used by VDBSimpleDebuggerConsoleApplication"
#'stx:goodies/announcements' "Announcement - superclass of RREvent"
#'stx:libbasic' "Collection - extended"
#'stx:libtool' "AbstractSettingsApplication - superclass of VDBSettingsApplication"
- #'stx:libview' "DisplaySurface - superclass of VDBWindowsDebuggerConsoleView"
+ #'stx:libview' "DisplaySurface - superclass of VDBSimpleDebuggerConsoleView"
#'stx:libview2' "ApplicationModel - superclass of VDBAbstractApplication"
- #'stx:libwidg' "EditTextView - superclass of VDBWindowsDebuggerConsoleView"
+ #'stx:libwidg' "EditTextView - superclass of VDBSimpleDebuggerConsoleView"
#'stx:libwidg2' "AbstractHierarchicalItem - superclass of VDBAbstractPresenter"
)
!
@@ -108,10 +108,10 @@
VDBIconLibrary
VDBInstructionBasicBlock
VDBSettingsApplication
+ VDBSimpleDebuggerConsoleView
VDBStartup
VDBVirtualMemoryMap
VDBVirtualMemoryRegion
- VDBWindowsDebuggerConsoleView
#'jv_vdb'
RRExitEvent
RRStartEvent
@@ -127,11 +127,11 @@
VDBInstructionsAndSourcePresenter
VDBMemoryApplication
VDBRegisterPresenter
+ VDBSimpleDebuggerConsoleApplication
VDBSourceApplication
VDBThreadGroupPresenter
VDBThreadPresenter
VDBVariableObjectPresenter
- VDBWindowsDebuggerConsoleApplication
VDBAbstractTreeApplication
VDBBreakpointListApplication
VDBTabbingContainer
--- a/libInit.cc Wed Nov 28 14:08:58 2018 +0000
+++ b/libInit.cc Wed Dec 12 16:35:20 2018 +0000
@@ -24,10 +24,10 @@
extern void _VDBIconLibrary_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBInstructionBasicBlock_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBSettingsApplication_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
+extern void _VDBSimpleDebuggerConsoleView_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBStartup_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBVirtualMemoryMap_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBVirtualMemoryRegion_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
-extern void _VDBWindowsDebuggerConsoleView_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _jv_137vdb_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _RRExitEvent_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _RRStartEvent_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
@@ -43,11 +43,11 @@
extern void _VDBInstructionsAndSourcePresenter_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBMemoryApplication_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBRegisterPresenter_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
+extern void _VDBSimpleDebuggerConsoleApplication_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBSourceApplication_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBThreadGroupPresenter_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBThreadPresenter_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBVariableObjectPresenter_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
-extern void _VDBWindowsDebuggerConsoleApplication_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBAbstractTreeApplication_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBBreakpointListApplication_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
extern void _VDBTabbingContainer_Init(int pass, struct __vmData__ *__pRT__, OBJ snd);
@@ -82,10 +82,10 @@
_VDBIconLibrary_Init(pass,__pRT__,snd);
_VDBInstructionBasicBlock_Init(pass,__pRT__,snd);
_VDBSettingsApplication_Init(pass,__pRT__,snd);
+ _VDBSimpleDebuggerConsoleView_Init(pass,__pRT__,snd);
_VDBStartup_Init(pass,__pRT__,snd);
_VDBVirtualMemoryMap_Init(pass,__pRT__,snd);
_VDBVirtualMemoryRegion_Init(pass,__pRT__,snd);
- _VDBWindowsDebuggerConsoleView_Init(pass,__pRT__,snd);
_jv_137vdb_Init(pass,__pRT__,snd);
_RRExitEvent_Init(pass,__pRT__,snd);
_RRStartEvent_Init(pass,__pRT__,snd);
@@ -101,11 +101,11 @@
_VDBInstructionsAndSourcePresenter_Init(pass,__pRT__,snd);
_VDBMemoryApplication_Init(pass,__pRT__,snd);
_VDBRegisterPresenter_Init(pass,__pRT__,snd);
+ _VDBSimpleDebuggerConsoleApplication_Init(pass,__pRT__,snd);
_VDBSourceApplication_Init(pass,__pRT__,snd);
_VDBThreadGroupPresenter_Init(pass,__pRT__,snd);
_VDBThreadPresenter_Init(pass,__pRT__,snd);
_VDBVariableObjectPresenter_Init(pass,__pRT__,snd);
- _VDBWindowsDebuggerConsoleApplication_Init(pass,__pRT__,snd);
_VDBAbstractTreeApplication_Init(pass,__pRT__,snd);
_VDBBreakpointListApplication_Init(pass,__pRT__,snd);
_VDBTabbingContainer_Init(pass,__pRT__,snd);