class: Tools::ProjectBuilderAssistantApplication
authorClaus Gittinger <cg@exept.de>
Tue, 07 May 2013 19:39:57 +0200
changeset 3005 9c5e0717155e
parent 3004 014368fad35b
child 3006 741e3e2f0270
class: Tools::ProjectBuilderAssistantApplication changed: #checkCompilerAvailability
Tools__ProjectBuilderAssistantApplication.st
--- a/Tools__ProjectBuilderAssistantApplication.st	Tue May 07 19:08:32 2013 +0200
+++ b/Tools__ProjectBuilderAssistantApplication.st	Tue May 07 19:39:57 2013 +0200
@@ -2897,29 +2897,29 @@
     usedCompiler := self usedCompilerHolder value.
     usedCompiler = 'bcc' ifTrue:[
         cmd := 'bcc32'.
-    ].
-    usedCompiler = 'vc' ifTrue:[
-        cmd := 'cl'.
-        warnMsg1 := 'Due to bugs in this C-compiler, some classes may not be compilable.'.
-    ].
-    usedCompiler = 'lcc' ifTrue:[
-        cmd := 'lcc'.
-        warnMsg1 := 'The LCC C-compiler suite is not officially supported.'.
-    ].
-    usedCompiler = 'tcc' ifTrue:[
-        cmd := 'tcc'.
-        OperatingSystem isMSWINDOWSlike ifTrue:[
-            warnMsg1 := 'The Tiny C-compiler suite is not yet supported (linkage).'.
-        ].
-    ].
-    usedCompiler = 'gcc' ifTrue:[
-        cmd := 'gcc'.
-    ].
-    usedCompiler = 'mingw' ifTrue:[
-        cmd := 'gcc'.
-        OperatingSystem isMSWINDOWSlike ifTrue:[
-            warnMsg1 := 'The MINGW C-compiler suite is not officially supported.'.
-        ].
+    ] ifFalse:[
+        usedCompiler = 'vc' ifTrue:[
+            cmd := 'cl'.
+            warnMsg1 := 'Due to bugs in this C-compiler, some classes may not be compilable.'.
+        ] ifFalse:[
+            usedCompiler = 'lcc' ifTrue:[
+                cmd := 'lcc'.
+                warnMsg1 := 'The LCC C-compiler suite is not officially supported.'.
+            ] ifFalse:[
+                usedCompiler = 'tcc' ifTrue:[
+                    cmd := 'tcc'.
+                    OperatingSystem isMSWINDOWSlike ifTrue:[
+                        warnMsg1 := 'The Tiny C-compiler suite is not yet supported (linkage).'.
+                    ].
+                ] ifFalse:[
+                    usedCompiler = 'gcc' ifTrue:[
+                        cmd := 'gcc'.
+                    ] ifFalse:[
+                        cmd := usedCompiler.
+                    ].
+                ]
+            ]
+        ]
     ].
 
     suite := ProjectBuilder suiteNameOfCompiler:(self usedCompilerHolder value).