hg/stx-goodies-monticello: MCMultiPackageLoader.st@f0a16c301971 (annotated)

1095 87f223484bc3 Issue #239: Fix all Smalltak/X source files to be in unicode (UTF8 without BOM) and prefixed by "{ Encoding: utf8 }" when any unicode character is present Patrik Svestka <patrik.svestka@gmail.com> parents: 658 diff changeset	1	"{ Encoding: utf8 }"
87f223484bc3 Issue #239: Fix all Smalltak/X source files to be in unicode (UTF8 without BOM) and prefixed by "{ Encoding: utf8 }" when any unicode character is present Patrik Svestka <patrik.svestka@gmail.com> parents: 658 diff changeset	2
206 1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	3	"{ Package: 'stx:goodies/monticello' }"
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	4
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	5	MCPackageLoader subclass:#MCMultiPackageLoader
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	6	instanceVariableNames:''
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	7	classVariableNames:''
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	8	poolDictionaries:''
658 642ef6bcab1a category change Claus Gittinger <cg@exept.de> parents: 311 diff changeset	9	category:'SCM-Monticello-Loading'
206 1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	10	!
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	11
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	12	MCMultiPackageLoader comment:'A PackageLoader doing some additional cross-package checks'
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	13	!
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	14
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	15
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	16	!MCMultiPackageLoader methodsFor:'private'!
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	17
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	18	analyze
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	19	\| index \|
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	20	index := MCDefinitionIndex definitions: additions.
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	21	removals removeAllSuchThat: [:removal \|
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	22	(index definitionLike: removal
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	23	ifPresent: [:addition \| obsoletions at: addition put: removal]
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	24	ifAbsent: []) notNil].
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	25	super analyze
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	26	! !
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	27
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	28	!MCMultiPackageLoader class methodsFor:'documentation'!
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	29
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	30	version
658 642ef6bcab1a category change Claus Gittinger <cg@exept.de> parents: 311 diff changeset	31	^ '$Header: /cvs/stx/stx/goodies/monticello/MCMultiPackageLoader.st,v 1.3 2012-09-11 21:24:40 cg Exp $'
206 1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	32	!
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	33
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	34	version_CVS
658 642ef6bcab1a category change Claus Gittinger <cg@exept.de> parents: 311 diff changeset	35	^ '$Header: /cvs/stx/stx/goodies/monticello/MCMultiPackageLoader.st,v 1.3 2012-09-11 21:24:40 cg Exp $'
206 1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	36	!
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	37
1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	38	version_SVN
1095 87f223484bc3 Issue #239: Fix all Smalltak/X source files to be in unicode (UTF8 without BOM) and prefixed by "{ Encoding: utf8 }" when any unicode character is present Patrik Svestka <patrik.svestka@gmail.com> parents: 658 diff changeset	39	^ '§Id: MCMultiPackageLoader.st 29 2011-03-14 12:24:51Z vranyj1 §'
206 1f1a5a9b2c7c initial checkin Claus Gittinger <cg@exept.de> parents: diff changeset	40	! !

author	Jan Vrany <jan.vrany@labware.com>
	Tue, 11 Jul 2023 12:59:07 +0100
branch	jv
changeset 1174	f0a16c301971
parent 1095	87f223484bc3
permissions	-rw-r--r--