hg/stx-goodies-ring: RGSlice.st@5cc2caa88b23 (annotated)

0 43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	1	"{ Package: 'stx:goodies/ring' }"
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	2
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	3	"{ NameSpace: Smalltalk }"
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	4
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	5	RGContainer subclass:#RGSlice
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	6	instanceVariableNames:''
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	7	classVariableNames:''
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	8	poolDictionaries:''
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	9	category:'Ring-Core-Containers'
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	10	!
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	11
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	12	RGSlice comment:'A slice is an arbitrary container of elements (working unit) By inheritance it knows how to treat classes and methods '
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	13	!
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	14
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	15	!RGSlice methodsFor:'adding/removing'!
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	16
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	17	addElement: aRGDefinition in: aCollection
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	18
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	19	aRGDefinition environment: self.
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	20	super addElement: aRGDefinition in: aCollection
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	21	! !
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	22
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	23	!RGSlice methodsFor:'testing'!
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	24
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	25	isSlice
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	26
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	27	^true
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	28	! !
43cb9f3e345e Initial port form Pharo Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	29

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Wed, 02 Sep 2015 18:29:03 +0100
changeset 5	5cc2caa88b23
parent 0	43cb9f3e345e
permissions	-rw-r--r--