--- a/Integer.st Wed Sep 16 13:47:20 2009 +0200
+++ b/Integer.st Wed Sep 16 13:51:31 2009 +0200
@@ -1141,6 +1141,9 @@
!Integer methodsFor:'Compatibility-Dolphin'!
& aNumber
+ "return the bitwise-and of the receiver and the argument, anInteger.
+ Same as bitAnd: - added for compatibility with Dolphin Smalltalk"
+
^ self bitAnd:aNumber
"
@@ -1193,16 +1196,26 @@
!
printStringRadix:aRadix padTo:sz
+ "return a printed representation of the receiver in a given radix,
+ padded with spaces (at the right) up to size.
+ If the printString is longer than size,
+ it is returned unchanged (i.e. not truncated).
+ See also printStringRadix:size:fill:"
+
^ self printStringRadix:aRadix size:sz fill:$0
"
- 1024 printStringRadix:16 size:4 fill:$0
- 1024 printStringRadix:2 size:16 fill:$.
- 1024 printStringRadix:16 size:8 fill:(Character space)
+ 1024 printStringRadix:16 padTo:4
+ 16rABCD printStringRadix:16 padTo:3
+ 1024 printStringRadix:2 padTo:16
+ 1024 printStringRadix:16 padTo:8
"
!
| aNumber
+ "return the bitwise-or of the receiver and the argument, anInteger.
+ Same as bitOr: - added for compatibility with Dolphin Smalltalk"
+
^ self bitOr:aNumber
"
@@ -4195,7 +4208,7 @@
!Integer class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.225 2009-09-04 08:11:42 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.226 2009-09-16 11:51:31 cg Exp $'
! !
Integer initialize!