#REFACTORING by cg
authorClaus Gittinger <cg@exept.de>
Fri, 11 May 2018 09:56:00 +0200
changeset 18108 cf744b854f74
parent 18107 50e0fcb79479
child 18109 3238e993a075
#REFACTORING by cg class: AbstractSettingsApplication::STCCompilerSettingsAppl changed: #setupForGCC #setupForMINGW
AbstractSettingsApplication.st
--- a/AbstractSettingsApplication.st	Thu May 10 23:57:19 2018 +0200
+++ b/AbstractSettingsApplication.st	Fri May 11 09:56:00 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 2002 by eXept Software AG
               All Rights Reserved
@@ -2428,7 +2430,7 @@
                                extent: (Point 665 22)
                              )
                             (CheckBoxSpec
-                               label: 'Allow Paragraph in Identifiers (§)'
+                               label: 'Allow Paragraph in Identifiers (§)'
                                name: 'CheckBox10'
                                activeHelpKey: allowParagraphInIdentifier
                                uuid: '9c9316ac-1f3f-11b2-903e-3065ec8abe8a'
@@ -14830,7 +14832,7 @@
     "set values for using gcc (linux/unix)"
 
     self cc value:'gcc'.
-    ExternalAddress pointerSize == 4 ifTrue:[
+    ExternalBytes sizeofPointer == 4 ifTrue:[
         self ccOptions value:'-m32'.
         self linkArgs value:'-m32'.
         self linkSharedArgs value:'-shared -m32'.
@@ -14862,14 +14864,14 @@
     programFilesX86 isEmptyOrNil ifTrue:[ programFilesX86 := 'C:\Program Files (x86)' ].
 
     "/ where to search
-    ExternalAddress pointerSize == 4 ifTrue:[
+    ExternalBytes sizeofPointer == 4 ifTrue:[
         mingwFolder := 'C:\mingw32'.
     ] ifFalse:[
         mingwFolder := 'C:\mingw64'.
     ].
     
     { programFilesX86 . programFiles . 'C:\' . 'C:\mingw' } do:[:triedFolder |
-        ExternalAddress pointerSize == 4 ifTrue:[
+        ExternalBytes sizeofPointer == 4 ifTrue:[
             (triedFolder asFilename / 'mingw32') exists ifTrue:[
                 mingwFolder := triedFolder asFilename constructString: 'mingw32'
             ].