#REFACTORING by mawalch
authormawalch
Wed, 26 Jul 2017 13:02:05 +0200
changeset 1646 3f0a10ee4125
parent 1645 da81f14033ea
child 1647 87d3c317faa4
#REFACTORING by mawalch class: RegressionTests::IntegerTest changed: #testMiscMath2
RegressionTests__IntegerTest.st
--- a/RegressionTests__IntegerTest.st	Wed Jul 26 12:41:45 2017 +0200
+++ b/RegressionTests__IntegerTest.st	Wed Jul 26 13:02:05 2017 +0200
@@ -3915,22 +3915,26 @@
 testMiscMath2
     self assert:(10000000000000000000000001 isPrime) not.
     self assert:(76 factorial + 1) isPrime not.
-    self assert:(77 factorial + 1) isPrime.
-    self assert:(872 factorial + 1) isPrime.
-    self assert:(1000 factorial + 1) isPrime not.
-
-    " 
+
+    "/ Would take far too long with fallback implementation.
+    PrimeNumberGenerator notNil ifTrue:[
+        self assert:(77 factorial + 1) isPrime.
+        self assert:(872 factorial + 1) isPrime.
+        self assert:(1000 factorial + 1) isPrime not.
+    ].
+
+    "
     Time millisecondsToRun:[
         1000000 factorial.
     ].
     "
-    
+
     "
      self basicNew testMiscMath2
     "
 
     "Created: / 05-07-2017 / 16:18:54 / cg"
-    "Modified: / 20-07-2017 / 16:53:35 / mawalch"
+    "Modified (comment): / 26-07-2017 / 12:48:11 / mawalch"
 !
 
 testModulu