fastFromString:
authorClaus Gittinger <cg@exept.de>
Fri, 18 Jun 1999 14:38:49 +0200
changeset 4296 2c967ce1879d
parent 4295 4adf74ef8e3e
child 4297 302e80e0b14a
fastFromString:
Float.st
--- a/Float.st	Fri Jun 18 14:38:04 1999 +0200
+++ b/Float.st	Fri Jun 18 14:38:49 1999 +0200
@@ -251,6 +251,10 @@
      self primitiveFailed.
 
     "
+     Float fastFromString:'123.45' at:1  
+     Float fastFromString:'123.45' at:2  
+     Float fastFromString:'123.45E4' at:1  
+     Float fastFromString:'hello123.45E4' at:6  
      Float fastFromString:'12345' at:1  
      Float fastFromString:'12345' at:2  
      Float fastFromString:'12345' at:3  
@@ -258,6 +262,7 @@
      Float fastFromString:'12345' at:5  
      Float fastFromString:'12345' at:6  
      Float fastFromString:'12345' at:0  
+     Float fastFromString:'hello123.45E4' at:1  
 
      Time millisecondsToRun:[
         100000 timesRepeat:[
@@ -1903,6 +1908,6 @@
 !Float class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.92 1999-06-18 12:38:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.93 1999-06-18 12:38:49 cg Exp $'
 ! !
 Float initialize!