--- a/LargeFloat.st Mon Jun 12 21:05:04 2017 +0200
+++ b/LargeFloat.st Mon Jun 12 21:05:17 2017 +0200
@@ -9,8 +9,9 @@
other person. No title to or ownership of the software is
hereby transferred.
"
+"{ Package: 'stx:libbasic' }"
-"{ Package: 'stx:libbasic' }"
+"{ NameSpace: Smalltalk }"
LimitedPrecisionReal subclass:#LargeFloat
instanceVariableNames:'exponent mantissa precision'
@@ -333,9 +334,11 @@
!
asLargeFloat
- "return a large float with same value - thats me"
+ "return a large float with same value - that's me"
^ self
+
+ "Modified (comment): / 12-06-2017 / 20:56:44 / cg"
!
asTrueFraction
@@ -735,7 +738,8 @@
!LargeFloat class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/LargeFloat.st,v 1.7 2004-11-12 12:23:46 cg Exp $'
+ ^ '$Header$'
! !
+
LargeFloat initialize!