hg/stx-goodies-sunit: SUnitNameResolver.st@2c96860ad5cb (annotated)

0 9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	1	"{ Package: 'stx:goodies/sunit' }"
9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	2
682 821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	3	"{ NameSpace: Smalltalk }"
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	4
0 9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	5	Object subclass:#SUnitNameResolver
9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	6	instanceVariableNames:''
682 821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	7	classVariableNames:'DefaultLogDevice'
0 9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	8	poolDictionaries:''
6 78bb1397e43d added rerun-defect tests; fixed button enable bug Claus Gittinger <cg@exept.de> parents: 0 diff changeset	9	category:'SUnit-Preload'
0 9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	10	!
9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	11
682 821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	12	!SUnitNameResolver class methodsFor:'documentation'!
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	13
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	14	documentation
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	15	"
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	16	documentation to be added.
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	17
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	18	[author:]
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	19	cg
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	20
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	21	[instance variables:]
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	22
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	23	[class variables:]
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	24
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	25	[see also:]
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	26
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	27	"
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	28	! !
14 a4a5478621e3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6 diff changeset	29
0 9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	30	!SUnitNameResolver class methodsFor:'Camp Smalltalk'!
9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	31
222 8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	32	classNamed: aSymbol
0 9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	33	^Smalltalk at: aSymbol ifAbsent: [nil]
111 acc21264ba47 Merge in SUnit 3.1 changes Stefan Vogel <sv@exept.de> parents: 68 diff changeset	34	!
0 9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	35
111 acc21264ba47 Merge in SUnit 3.1 changes Stefan Vogel <sv@exept.de> parents: 68 diff changeset	36	defaultLogDevice
682 821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	37	^ DefaultLogDevice ? Transcript
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	38
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	39	"Modified: / 13-07-2017 / 15:10:00 / cg"
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	40	!
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	41
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	42	defaultLogDevice:aStream
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	43	DefaultLogDevice := aStream
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	44
821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	45	"Created: / 13-07-2017 / 15:10:09 / cg"
111 acc21264ba47 Merge in SUnit 3.1 changes Stefan Vogel <sv@exept.de> parents: 68 diff changeset	46	!
acc21264ba47 Merge in SUnit 3.1 changes Stefan Vogel <sv@exept.de> parents: 68 diff changeset	47
222 8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	48	errorObject
8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	49
8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	50	^Exception
8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	51	"/ ^Error
8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	52
8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	53	"Modified: / 11-09-2010 / 15:10:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
111 acc21264ba47 Merge in SUnit 3.1 changes Stefan Vogel <sv@exept.de> parents: 68 diff changeset	54	!
acc21264ba47 Merge in SUnit 3.1 changes Stefan Vogel <sv@exept.de> parents: 68 diff changeset	55
222 8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	56	mnuExceptionObject
8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	57	^MessageNotUnderstood
111 acc21264ba47 Merge in SUnit 3.1 changes Stefan Vogel <sv@exept.de> parents: 68 diff changeset	58	!
acc21264ba47 Merge in SUnit 3.1 changes Stefan Vogel <sv@exept.de> parents: 68 diff changeset	59
222 8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	60	notificationObject
8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	61	^Notification
0 9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	62	! !
9365d5753f11 * empty log message * Claus Gittinger <cg@exept.de> parents: diff changeset	63
14 a4a5478621e3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6 diff changeset	64	!SUnitNameResolver class methodsFor:'documentation'!
a4a5478621e3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6 diff changeset	65
a4a5478621e3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6 diff changeset	66	version
682 821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	67	^ '$Header$'
222 8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	68	!
8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	69
8e6f482297fa Jan's 4.1 version Claus Gittinger <cg@exept.de> parents: 116 diff changeset	70	version_SVN
682 821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	71	^ '$Id$'
14 a4a5478621e3 * empty log message * Claus Gittinger <cg@exept.de> parents: 6 diff changeset	72	! !
682 821a58279bcd #UI_ENHANCEMENT by cg Claus Gittinger <cg@exept.de> parents: 222 diff changeset	73

author	Claus Gittinger <cg@exept.de>
	Sun, 01 Jul 2018 12:52:19 +0200
changeset 719	2c96860ad5cb
parent 682	821a58279bcd
permissions	-rw-r--r--