changed: #copySupportFilesForLinkage
authorClaus Gittinger <cg@exept.de>
Tue, 04 Sep 2012 12:02:02 +0200
changeset 2914 745b9c77b599
parent 2913 94e5ae8e15b2
child 2915 e0da59b7e3c9
changed: #copySupportFilesForLinkage
ProjectBuilder.st
--- a/ProjectBuilder.st	Tue Sep 04 10:01:17 2012 +0200
+++ b/ProjectBuilder.st	Tue Sep 04 12:02:02 2012 +0200
@@ -493,20 +493,20 @@
                         'support/win32/borland/cs3245.dll' 
                         'support/win32/X11.dll'
                         'support/win32/Xext.dll'
-                        'libbc/librun.lib'
-                        'libbc/cs32i.lib'
+                        'lib_bc/librun.lib'
+                        'lib_bc/cs32i.lib'
                     ).
         ].
         usedCompiler = 'vc' ifTrue:[
             files := files , #( 
                         'librun/objvc/librun.dll'
-                        'libvc/librun.lib'
+                        'lib_vc/librun.lib'
                     ).
         ].
         usedCompiler = 'tcc' ifTrue:[
             files := files , #( 
                         'librun/objvc/librun.dll'
-                        'libvc/librun.lib'
+                        'lib_vc/librun.lib'
                     ).
         ].
     ] ifFalse:[
@@ -526,22 +526,22 @@
         ].
     ].
 
-    files do:[:dllRelativePath |
-        (mySTXTopDirectory / dllRelativePath) exists ifTrue:[
-            ((buildDirectory / 'stx' / dllRelativePath) exists
-            and:[ (mySTXTopDirectory / dllRelativePath) fileSize = (buildDirectory / 'stx' / dllRelativePath) fileSize
-            and:[ (mySTXTopDirectory / dllRelativePath) modificationTime < (buildDirectory / 'stx' / dllRelativePath) modificationTime
+    files do:[:relativePath |
+        (mySTXTopDirectory / relativePath) exists ifTrue:[
+            ((buildDirectory / 'stx' / relativePath) exists
+            and:[ (mySTXTopDirectory / relativePath) fileSize = (buildDirectory / 'stx' / relativePath) fileSize
+            and:[ (mySTXTopDirectory / relativePath) modificationTime < (buildDirectory / 'stx' / relativePath) modificationTime
             "/ and:[ (mySTXTopDirectory / dllRelativePath) sameContentsAs:(targetBuildDir / dllRelativePath) ]
             ]]) ifFalse:[
-                (buildDirectory / 'stx' / dllRelativePath) directory recursiveMakeDirectory.
-                (mySTXTopDirectory / dllRelativePath) copyTo:(buildDirectory / 'stx' / dllRelativePath).    
+                (buildDirectory / 'stx' / relativePath) directory recursiveMakeDirectory.
+                (mySTXTopDirectory / relativePath) copyTo:(buildDirectory / 'stx' / relativePath).    
             ]
         ] ifFalse:[
-            self error:'Missing file: ',dllRelativePath printString mayProceed:true.
+            self error:'Missing file: ',relativePath printString mayProceed:true.
         ].
     ].
 
-    "Modified (comment): / 04-09-2012 / 00:48:24 / cg"
+    "Modified: / 04-09-2012 / 11:59:53 / cg"
 !
 
 createHeaderFileFor:aClass in:packageTargetDir