Correctly initialize ParserFlags>>linkArgs and ParserFlags>>linkSharedArgs for GCC jv
authorJan Vrany <jan.vrany@fit.cvut.cz>
Thu, 04 Feb 2016 15:54:53 +0000
branchjv
changeset 3707 4593eb11f9f5
parent 3706 dc340265d27d
child 3710 e529aebad054
child 3714 0a4fc91dd178
Correctly initialize ParserFlags>>linkArgs and ParserFlags>>linkSharedArgs for GCC Must use `-m32` especilly on 64bit os running 32bit Smalltalk/X.
ParserFlags.st
--- a/ParserFlags.st	Thu Jan 28 06:50:24 2016 +0100
+++ b/ParserFlags.st	Thu Feb 04 15:54:53 2016 +0000
@@ -1632,10 +1632,16 @@
 initializeSTCFlagsForGCC
     self ccPath: 'gcc'.
     self linkCommand: 'gcc'.
-    self linkArgs: ''.
-    self linkSharedArgs: '-shared'
+    ExternalAddress pointerSize == 4 ifTrue:[
+        self linkArgs: '-m32'.
+        self linkSharedArgs: '-shared -m32'
+    ] ifFalse:[ 
+        self linkArgs: '-m64'.
+        self linkSharedArgs: '-shared -m64'
+    ].
 
     "Created: / 09-12-2015 / 22:10:52 / jv"
+    "Modified: / 03-02-2016 / 23:48:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 initializeSTCFlagsForMINGW32