class: ProjectDefinition
authorStefan Vogel <sv@exept.de>
Fri, 14 Mar 2014 14:49:40 +0100
changeset 16256 466564fe326f
parent 16255 1c5caf18b1d1
child 16257 5772bfdc494b
class: ProjectDefinition changed: #allPreRequisitesSorted: fix slow grow of Array
ProjectDefinition.st
--- 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