Magnitude.st
branchjv
changeset 18397 20527009f352
parent 18120 e3a375d5f6a8
parent 18396 b42870402e9b
child 19009 0181a8078105
--- 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 $'
 ! !