Fix LongFloat botch
authorStefan Vogel <sv@exept.de>
Wed, 21 May 2014 21:22:26 +0200
changeset 16479 9c0562f22996
parent 16478 d2938d9d8d25
child 16480 2b0c4915f31d
Fix LongFloat botch
TimeDuration.st
--- a/TimeDuration.st	Wed May 21 17:28:49 2014 +0200
+++ b/TimeDuration.st	Wed May 21 21:22:26 2014 +0200
@@ -615,7 +615,7 @@
 asLongFloat
     "answer the duration is seconds"
 
-    ^ timeEncoding / 1000q
+    ^ timeEncoding / 1000 asLongFloat
 
     "
         (10 milliseconds)  asLongFloat
@@ -1149,11 +1149,11 @@
 !TimeDuration class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/TimeDuration.st,v 1.69 2014-05-21 15:28:49 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/TimeDuration.st,v 1.70 2014-05-21 19:22:26 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/TimeDuration.st,v 1.69 2014-05-21 15:28:49 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/TimeDuration.st,v 1.70 2014-05-21 19:22:26 stefan Exp $'
 ! !