--- a/Integer.st	Wed Jul 26 13:50:34 2017 +0200
+++ b/Integer.st	Wed Jul 26 17:03:02 2017 +0200
@@ -794,8 +794,6 @@
     "Modified: / 15.11.1999 / 20:35:20 / cg"
 ! !
 
-
-
 !Integer class methodsFor:'class initialization'!
 
 initialize
@@ -852,7 +850,6 @@
     "Modified: 18.7.1996 / 12:26:38 / cg"
 ! !
 
-
 !Integer class methodsFor:'prime numbers'!
 
 flushPrimeCache
@@ -1230,7 +1227,6 @@
     ^ self == Integer
 ! !
 
-
 !Integer methodsFor:'Compatibility-Dolphin'!
 
 highWord
@@ -4826,11 +4822,7 @@
     ].
 
     "/ Not absolutely correct, but was broken much worse before.
-    limit := self sqrt.
-    limit isNaN ifTrue:[
-        DomainError raiseRequestErrorString:'Number too large for current fallback implementation.'.
-    ].
-    limit := limit asInteger.
+    limit := self integerSqrt.
     (firstFewPrimes last+2) to:limit by:2 do:[:i |
         (self \\ i) == 0 ifTrue:[ ^ false ].
     ].
@@ -4989,7 +4981,6 @@
     "Created: / 09-01-2012 / 17:18:06 / cg"
 ! !
 
-
 !Integer methodsFor:'special modulo arithmetic'!
 
 add_32:anInteger