class: ProjectDefinition
changed: #allPreRequisitesSorted:
fix slow grow of Array
--- a/ProjectDefinition.st Fri Mar 14 12:55:17 2014 +0100
+++ b/ProjectDefinition.st Fri Mar 14 14:49:40 2014 +0100
@@ -12,11 +12,11 @@
"{ Package: 'stx:libbasic' }"
Object subclass:#ProjectDefinition
- instanceVariableNames:''
- classVariableNames:'LibraryType GUIApplicationType NonGUIApplicationType
- PackagesBeingLoaded Verbose AbbrevDictionary AccessLock'
- poolDictionaries:''
- category:'System-Support-Projects'
+ instanceVariableNames:''
+ classVariableNames:'LibraryType GUIApplicationType NonGUIApplicationType
+ PackagesBeingLoaded Verbose AbbrevDictionary AccessLock'
+ poolDictionaries:''
+ category:'System-Support-Projects'
!
ProjectDefinition class instanceVariableNames:'safeForOverwrittenMethods extensionOverwriteInfo projectIsLoaded'
@@ -27,10 +27,10 @@
!
Object subclass:#AbbrevEntry
- instanceVariableNames:'className fileName category numClassInstVars'
- classVariableNames:''
- poolDictionaries:''
- privateIn:ProjectDefinition
+ instanceVariableNames:'className fileName category numClassInstVars'
+ classVariableNames:''
+ poolDictionaries:''
+ privateIn:ProjectDefinition
!
!ProjectDefinition class methodsFor:'documentation'!
@@ -870,6 +870,8 @@
"Modified (comment): / 28-06-2013 / 11:25:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+
+
!ProjectDefinition class methodsFor:'accessing - packaging'!
classNames:aCollectionOfClassNames
@@ -1132,7 +1134,6 @@
].
! !
-
!ProjectDefinition class methodsFor:'accessing - tests'!
excludedFromTestSuite
@@ -2156,6 +2157,7 @@
"Modified: / 17-08-2006 / 19:59:26 / cg"
! !
+
!ProjectDefinition class methodsFor:'description - classes'!
additionalClassNamesAndAttributes
@@ -6711,7 +6713,7 @@
fold:[:d1 :d2| d1 addAll:d2; yourself]) keys
] ifFalse:[
preRequisites := def perform:aSelector.
- preRequisites removeAllFoundIn:def excludedFromPreRequisites.
+ preRequisites := preRequisites copyWithoutAll:def excludedFromPreRequisites.
preRequisites do:[:eachPrerequisitePackageID|
self assert:(eachPrerequisitePackageID ~= eachPackageID).
orderedTuples add:(Array with:eachPrerequisitePackageID with:eachPackageID).
@@ -7596,11 +7598,11 @@
!ProjectDefinition class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.499 2014-03-05 17:04:54 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.500 2014-03-14 13:49:40 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.499 2014-03-05 17:04:54 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.500 2014-03-14 13:49:40 stefan Exp $'
!
version_SVN