hg/jv-libgdbs: GDBCommandResultEvent.st@e7bd05df3d6b (annotated)

91 472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	1	"
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	2	jv:libgdbs - GNU Debugger Interface Library
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	3	Copyright (C) 2015-now Jan Vrany
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	4
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	5	This library is free software; you can redistribute it and/or
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	6	modify it under the terms of the GNU Lesser General Public
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	7	License as published by the Free Software Foundation; either
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	8	version 2.1 of the License.
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	9
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	10	This library is distributed in the hope that it will be useful,
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	11	but WITHOUT ANY WARRANTY; without even the implied warranty of
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	12	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	13	Lesser General Public License for more details.
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	14
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	15	You should have received a copy of the GNU Lesser General Public
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	16	License along with this library; if not, write to the Free Software
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	17	Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	18	"
3 29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	19	"{ Package: 'jv:libgdbs' }"
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	20
59 95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	21	"{ NameSpace: Smalltalk }"
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	22
6 d935bc59f6f4 Removed useless MI prefix Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3 diff changeset	23	GDBEvent subclass:#GDBCommandResultEvent
3 29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	24	instanceVariableNames:'result'
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	25	classVariableNames:''
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	26	poolDictionaries:''
6 d935bc59f6f4 Removed useless MI prefix Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3 diff changeset	27	category:'GDB-Core-Events'
3 29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	28	!
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	29
91 472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	30	!GDBCommandResultEvent class methodsFor:'documentation'!
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	31
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	32	copyright
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	33	"
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	34	jv:libgdbs - GNU Debugger Interface Library
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	35	Copyright (C) 2015-now Jan Vrany
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	36
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	37	This library is free software; you can redistribute it and/or
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	38	modify it under the terms of the GNU Lesser General Public
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	39	License as published by the Free Software Foundation; either
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	40	version 2.1 of the License.
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	41
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	42	This library is distributed in the hope that it will be useful,
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	43	but WITHOUT ANY WARRANTY; without even the implied warranty of
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	44	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	45	Lesser General Public License for more details.
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	46
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	47	You should have received a copy of the GNU Lesser General Public
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	48	License along with this library; if not, write to the Free Software
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	49	Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	50	"
472a4841a8b6 License this package under 'GNU Lesser General Public License' Jan Vrany <jan.vrany@fit.cvut.cz> parents: 78 diff changeset	51	! !
59 95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	52
6 d935bc59f6f4 Removed useless MI prefix Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3 diff changeset	53	!GDBCommandResultEvent methodsFor:'accessing'!
3 29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	54
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	55	result
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	56	^ result
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	57	!
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	58
169 a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	59	result:aGDBCommandResult
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	60	result := aGDBCommandResult.
9 5cc8797f6523 Make simple example with -gdb-exit command working Jan Vrany <jan.vrany@fit.cvut.cz> parents: 6 diff changeset	61	!
5cc8797f6523 Make simple example with -gdb-exit command working Jan Vrany <jan.vrany@fit.cvut.cz> parents: 6 diff changeset	62
5cc8797f6523 Make simple example with -gdb-exit command working Jan Vrany <jan.vrany@fit.cvut.cz> parents: 6 diff changeset	63	status
5cc8797f6523 Make simple example with -gdb-exit command working Jan Vrany <jan.vrany@fit.cvut.cz> parents: 6 diff changeset	64	^ result status
5cc8797f6523 Make simple example with -gdb-exit command working Jan Vrany <jan.vrany@fit.cvut.cz> parents: 6 diff changeset	65
5cc8797f6523 Make simple example with -gdb-exit command working Jan Vrany <jan.vrany@fit.cvut.cz> parents: 6 diff changeset	66	"Created: / 04-06-2014 / 09:30:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3 29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	67	! !
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	68
59 95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	69	!GDBCommandResultEvent methodsFor:'displaying'!
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	70
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	71	displayString
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	72	^ '%1 [finished, %2]' bindWith: result command asString with: result status
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	73
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	74	"Created: / 01-03-2015 / 08:56:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	75	! !
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	76
169 a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	77	!GDBCommandResultEvent methodsFor:'printing & storing'!
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	78
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	79	printOn:aStream
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	80	"append a printed representation of the receiver to the argument, aStream"
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	81
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	82	super printOn:aStream.
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	83	aStream
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	84	nextPut:$(;
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	85	nextPutAll: result status;
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	86	nextPutAll:': ';
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	87	nextPutAll: result command asString;
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	88	nextPut:$).
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	89
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	90	"Created: / 19-01-2019 / 22:59:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	91	! !
a3d1f59e3bfd API: add `GDBDebugger >> getParameter:` and `setParameter:to:` Jan Vrany <jan.vrany@fit.cvut.cz> parents: 91 diff changeset	92
6 d935bc59f6f4 Removed useless MI prefix Jan Vrany <jan.vrany@fit.cvut.cz> parents: 3 diff changeset	93	!GDBCommandResultEvent methodsFor:'testing'!
3 29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	94
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	95	isCommandResultEvent
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	96	^ true
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	97	! !
29ea333a1811 More work on events and parsing. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	98
59 95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	99	!GDBCommandResultEvent class methodsFor:'documentation'!
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	100
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	101	version_HG
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	102
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	103	^ '$Changeset: <not expanded> $'
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	104	! !
95d6b1e90e2d Better display string for command result Jan Vrany <jan.vrany@fit.cvut.cz> parents: 9 diff changeset	105

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Mon, 25 Feb 2019 17:55:20 +0000
changeset 177	e7bd05df3d6b
parent 169	a3d1f59e3bfd
child 256	9e2ac3a4f23c
permissions	-rw-r--r--