RegressionTests__NumberTest.st
changeset 1719 824a2964db3a
parent 1718 4b7eaecbbbae
child 1774 e4366b272224
--- a/RegressionTests__NumberTest.st	Tue Oct 10 12:38:23 2017 +0200
+++ b/RegressionTests__NumberTest.st	Tue Oct 10 12:43:08 2017 +0200
@@ -3,10 +3,10 @@
 "{ NameSpace: RegressionTests }"
 
 TestCase subclass:#NumberTest
-	instanceVariableNames:'a b'
-	classVariableNames:''
-	poolDictionaries:''
-	category:'tests-Regression-Numbers'
+        instanceVariableNames:'a b'
+        classVariableNames:''
+        poolDictionaries:''
+        category:'tests-Regression-Numbers'
 !
 
 
@@ -32,7 +32,7 @@
 
 tearDown
     Class withoutUpdatingChangesDo:[
-	self class removeSelector:#testEQ
+        self class removeSelector:#testEQ
     ].
 ! !
 
@@ -217,9 +217,12 @@
 
 testPrintf_QDouble
     "/ QDouble
-    
+
+    self 
+        skipIf:(OperatingSystem isUNIXlike and:[ExternalAddress pointerSize = 4])
+        description:'Fails under Linux32'.
+
     self assert:( (PrintfScanf printf:'%4f' argument:QDouble pi)    = '3.14159265358979323846' ).
-
     "/ QuadDouble
 
     "/ too small