# HG changeset patch # User Claus Gittinger # Date 1497294317 -7200 # Node ID 63325b999dbf7872a9588026a66b5c3e7315bf70 # Parent 89005eece5f43bae8d4a34f453e46e84d47ca8e1 #DOCUMENTATION by cg class: LargeFloat comment/format in: #asLargeFloat diff -r 89005eece5f4 -r 63325b999dbf LargeFloat.st --- 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!