--- a/BitArray.st Tue Mar 26 11:36:30 2019 +0100
+++ b/BitArray.st Tue Mar 26 11:54:05 2019 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1997 by eXept Software AG / Claus Gittinger
All Rights Reserved
@@ -306,6 +308,7 @@
atAllPut:aNumber
"replace all elements of the collection by the argument, aNumber.
+ Return the receiver.
The argument, aBoolean must be 0 or 1.
Notice: This operation modifies the receiver, NOT a copy;
therefore the change may affect all others referencing the receiver."
@@ -346,6 +349,8 @@
((self new:10) atAllPut:1) countOnes
((self new:8) atAllPut:1) countOnes
"
+
+ "Modified (comment): / 26-03-2019 / 11:52:55 / Claus Gittinger"
! !
!BitArray methodsFor:'logical operations'!
@@ -499,6 +504,7 @@
^ tally
! !
+
!BitArray methodsFor:'visiting'!
acceptVisitor:aVisitor with:aParameter