#FEATURE by Stefan Reise expecco_19_2_0
authorsr
Tue, 03 Dec 2019 11:47:02 +0100
changeset 766 9fbada22f0db
parent 765 25cfb3b6f834
child 767 1202fd05550b
#FEATURE by Stefan Reise class: TestCase class added: #isCompiledWithBorland32 #isCompiledWithGcc32 #isCompiledWithGcc64 #isCompiledWithMingw64 removed: #isRunningUnderBorland32 #isRunningUnderGcc32 #isRunningUnderGcc64 #isRunningUnderMingw64
TestCase.st
--- a/TestCase.st	Tue Dec 03 11:46:05 2019 +0100
+++ b/TestCase.st	Tue Dec 03 11:47:02 2019 +0100
@@ -463,48 +463,48 @@
         ^self == TestCase
 !
 
-isRunningUnderBorland32
+isCompiledWithBorland32
     "
-        self isRunningUnderBorland32
+        self isCompiledWithBorland32
     "
 
     ^ OperatingSystem isMSWINDOWSlike
     and:[ExternalAddress pointerSize == 4]
 
-    "Created: / 03-12-2019 / 11:45:25 / Stefan Reise"
+    "Created: / 03-12-2019 / 11:46:31 / Stefan Reise"
 !
 
-isRunningUnderGcc32
+isCompiledWithGcc32
     "
-        self isRunningUnderGcc32  
+        self isCompiledWithGcc32  
     "
 
     ^ OperatingSystem isMSWINDOWSlike not
     and:[ExternalAddress pointerSize == 4]
 
-    "Created: / 03-12-2019 / 11:45:54 / Stefan Reise"
+    "Created: / 03-12-2019 / 11:46:28 / Stefan Reise"
 !
 
-isRunningUnderGcc64
+isCompiledWithGcc64
     "
-        self isRunningUnderGcc64
+        self isCompiledWithGcc64
     "
 
     ^ OperatingSystem isMSWINDOWSlike not
     and:[ExternalAddress pointerSize == 8]
 
-    "Created: / 03-12-2019 / 11:45:46 / Stefan Reise"
+    "Created: / 03-12-2019 / 11:46:42 / Stefan Reise"
 !
 
-isRunningUnderMingw64
+isCompiledWithMingw64
     "
-        self isRunningUnderMingw64
+        self isCompiledWithMingw64
     "
 
     ^ OperatingSystem isMSWINDOWSlike
     and:[ExternalAddress pointerSize == 8]
 
-    "Created: / 03-12-2019 / 11:45:34 / Stefan Reise"
+    "Created: / 03-12-2019 / 11:46:46 / Stefan Reise"
 !
 
 requiredPackageNames