--- a/Magnitude.st Sat May 23 06:49:51 2015 +0200
+++ b/Magnitude.st Mon May 25 02:51:46 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1988 by Claus Gittinger
All Rights Reserved
@@ -11,6 +13,8 @@
"
"{ Package: 'stx:libbasic' }"
+"{ NameSpace: Smalltalk }"
+
Object subclass:#Magnitude
instanceVariableNames:''
classVariableNames:''
@@ -382,8 +386,8 @@
!Magnitude methodsFor:'testing'!
between:min and:max
- "return whether the receiver is less than or equal to the argument max
- and greater than or equal to the argument min."
+ "return true if the receiver greater than or equal to the argument min
+ and less than or equal to the argument max"
(self < min) ifTrue:[^ false].
(max < self) ifTrue:[^ false].
@@ -413,6 +417,6 @@
!Magnitude class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Magnitude.st,v 1.27 2014-03-24 11:28:33 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Magnitude.st,v 1.28 2015-05-23 15:00:25 cg Exp $'
! !