hg/stx-libbasic3: CompositeChange.st@1997ff6e7e55 (annotated)

2366 a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	1	"
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	2	COPYRIGHT (c) 2006 by eXept Software AG
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	3	All Rights Reserved
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	4
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	5	This software is furnished under a license and may be used
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	6	only in accordance with the terms of that license and with the
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	7	inclusion of the above copyright notice. This software may not
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	8	be provided or otherwise made available to, or used by, any
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	9	other person. No title to or ownership of the software is
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	10	hereby transferred.
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	11	"
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	12	"{ Package: 'stx:libbasic3' }"
2156 789fcc73429d initial checkin fm parents: diff changeset	13
789fcc73429d initial checkin fm parents: diff changeset	14	Change subclass:#CompositeChange
789fcc73429d initial checkin fm parents: diff changeset	15	instanceVariableNames:'name changes'
789fcc73429d initial checkin fm parents: diff changeset	16	classVariableNames:''
789fcc73429d initial checkin fm parents: diff changeset	17	poolDictionaries:''
789fcc73429d initial checkin fm parents: diff changeset	18	category:'System-Changes'
789fcc73429d initial checkin fm parents: diff changeset	19	!
789fcc73429d initial checkin fm parents: diff changeset	20
2366 a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	21	!CompositeChange class methodsFor:'documentation'!
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	22
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	23	copyright
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	24	"
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	25	COPYRIGHT (c) 2006 by eXept Software AG
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	26	All Rights Reserved
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	27
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	28	This software is furnished under a license and may be used
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	29	only in accordance with the terms of that license and with the
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	30	inclusion of the above copyright notice. This software may not
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	31	be provided or otherwise made available to, or used by, any
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	32	other person. No title to or ownership of the software is
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	33	hereby transferred.
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	34	"
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	35	! !
2156 789fcc73429d initial checkin fm parents: diff changeset	36
789fcc73429d initial checkin fm parents: diff changeset	37	!CompositeChange class methodsFor:'instance creation'!
789fcc73429d initial checkin fm parents: diff changeset	38
789fcc73429d initial checkin fm parents: diff changeset	39	name: aString changes: aChangeSet
789fcc73429d initial checkin fm parents: diff changeset	40
789fcc73429d initial checkin fm parents: diff changeset	41	^self new
789fcc73429d initial checkin fm parents: diff changeset	42	name: aString;
789fcc73429d initial checkin fm parents: diff changeset	43	changes: aChangeSet;
789fcc73429d initial checkin fm parents: diff changeset	44	yourself.
789fcc73429d initial checkin fm parents: diff changeset	45
789fcc73429d initial checkin fm parents: diff changeset	46	"Created: / 25-07-2009 / 19:36:40 / Jan Vrany <vranyj1@fel.cvut.cz>"
789fcc73429d initial checkin fm parents: diff changeset	47	! !
789fcc73429d initial checkin fm parents: diff changeset	48
789fcc73429d initial checkin fm parents: diff changeset	49	!CompositeChange methodsFor:'accessing'!
789fcc73429d initial checkin fm parents: diff changeset	50
789fcc73429d initial checkin fm parents: diff changeset	51	changes
789fcc73429d initial checkin fm parents: diff changeset	52	^ changes
789fcc73429d initial checkin fm parents: diff changeset	53	!
789fcc73429d initial checkin fm parents: diff changeset	54
789fcc73429d initial checkin fm parents: diff changeset	55	changes:aChangeSet
789fcc73429d initial checkin fm parents: diff changeset	56	changes := aChangeSet.
789fcc73429d initial checkin fm parents: diff changeset	57	!
789fcc73429d initial checkin fm parents: diff changeset	58
789fcc73429d initial checkin fm parents: diff changeset	59	name
789fcc73429d initial checkin fm parents: diff changeset	60	^ name
789fcc73429d initial checkin fm parents: diff changeset	61	!
789fcc73429d initial checkin fm parents: diff changeset	62
789fcc73429d initial checkin fm parents: diff changeset	63	name:aString
789fcc73429d initial checkin fm parents: diff changeset	64	name := aString.
789fcc73429d initial checkin fm parents: diff changeset	65	! !
789fcc73429d initial checkin fm parents: diff changeset	66
789fcc73429d initial checkin fm parents: diff changeset	67	!CompositeChange methodsFor:'applying'!
789fcc73429d initial checkin fm parents: diff changeset	68
789fcc73429d initial checkin fm parents: diff changeset	69	apply
789fcc73429d initial checkin fm parents: diff changeset	70
789fcc73429d initial checkin fm parents: diff changeset	71	changes apply
789fcc73429d initial checkin fm parents: diff changeset	72
789fcc73429d initial checkin fm parents: diff changeset	73	"Modified: / 25-07-2009 / 19:41:35 / Jan Vrany <vranyj1@fel.cvut.cz>"
789fcc73429d initial checkin fm parents: diff changeset	74	! !
789fcc73429d initial checkin fm parents: diff changeset	75
2366 a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	76	!CompositeChange methodsFor:'enumerating'!
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	77
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	78	do: aBlock
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	79
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	80	^changes do: aBlock
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	81
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	82	"Created: / 29-10-2010 / 14:03:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	83	! !
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	84
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	85	!CompositeChange methodsFor:'fileout'!
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	86
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	87	fileOutOn: aStream
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	88
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	89
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	90	changes do:[:e\|e fileOutOn: aStream]
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	91	! !
a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	92
2156 789fcc73429d initial checkin fm parents: diff changeset	93	!CompositeChange methodsFor:'printing & storing'!
789fcc73429d initial checkin fm parents: diff changeset	94
789fcc73429d initial checkin fm parents: diff changeset	95	printOn: aStream
789fcc73429d initial checkin fm parents: diff changeset	96
789fcc73429d initial checkin fm parents: diff changeset	97	^name printOn: aStream
789fcc73429d initial checkin fm parents: diff changeset	98
789fcc73429d initial checkin fm parents: diff changeset	99	"Created: / 25-07-2009 / 19:44:25 / Jan Vrany <vranyj1@fel.cvut.cz>"
789fcc73429d initial checkin fm parents: diff changeset	100	! !
789fcc73429d initial checkin fm parents: diff changeset	101
2366 a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	102
2156 789fcc73429d initial checkin fm parents: diff changeset	103	!CompositeChange methodsFor:'queries'!
789fcc73429d initial checkin fm parents: diff changeset	104
789fcc73429d initial checkin fm parents: diff changeset	105	isCompositeChange
789fcc73429d initial checkin fm parents: diff changeset	106
789fcc73429d initial checkin fm parents: diff changeset	107	^true
789fcc73429d initial checkin fm parents: diff changeset	108
789fcc73429d initial checkin fm parents: diff changeset	109	"Created: / 25-07-2009 / 23:17:51 / Jan Vrany <vranyj1@fel.cvut.cz>"
789fcc73429d initial checkin fm parents: diff changeset	110	! !
789fcc73429d initial checkin fm parents: diff changeset	111
2366 a63dcb66f349 Initial checkin vrany parents: 2190 diff changeset	112
2156 789fcc73429d initial checkin fm parents: diff changeset	113	!CompositeChange class methodsFor:'documentation'!
789fcc73429d initial checkin fm parents: diff changeset	114
789fcc73429d initial checkin fm parents: diff changeset	115	version
3011 1997ff6e7e55 trunk branched into /branches/jv Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2366 diff changeset	116	^ '$Header: /cvs/stx/stx/libbasic3/CompositeChange.st,v 1.4 2011/06/28 20:35:48 vrany Exp $'
2172 1ff2a906abe2 changed: #version_SVN fm parents: 2156 diff changeset	117	!
1ff2a906abe2 changed: #version_SVN fm parents: 2156 diff changeset	118
1ff2a906abe2 changed: #version_SVN fm parents: 2156 diff changeset	119	version_CVS
3011 1997ff6e7e55 trunk branched into /branches/jv Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2366 diff changeset	120	^ '�Header: /cvs/stx/stx/libbasic3/CompositeChange.st,v 1.4 2011/06/28 20:35:48 vrany Exp �'
2172 1ff2a906abe2 changed: #version_SVN fm parents: 2156 diff changeset	121	!
1ff2a906abe2 changed: #version_SVN fm parents: 2156 diff changeset	122
1ff2a906abe2 changed: #version_SVN fm parents: 2156 diff changeset	123	version_SVN
3011 1997ff6e7e55 trunk branched into /branches/jv Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2366 diff changeset	124	^ '$Id: CompositeChange.st 1869 2012-01-29 11:53:49Z vranyj1 $'
1997ff6e7e55 trunk branched into /branches/jv Jan Vrany <jan.vrany@fit.cvut.cz> parents: 2366 diff changeset	125	! !

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Sun, 29 Jan 2012 12:51:41 +0000
branch	jv
changeset 3011	1997ff6e7e55
parent 2366	a63dcb66f349
child 3042	48e76977cdc3
permissions	-rw-r--r--