--- a/ExternalBytes.st Thu Apr 08 13:51:40 2010 +0200
+++ b/ExternalBytes.st Thu Apr 08 13:57:17 2010 +0200
@@ -746,9 +746,7 @@
instVarAt:index
"redefined to suppress direct access to my address, which is a non-object"
- index == 1 ifTrue:[
- ^ self address
- ].
+ index == 1 ifTrue:[^ self address].
^ super instVarAt:index
! !
@@ -1281,11 +1279,11 @@
!ExternalBytes class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ExternalBytes.st,v 1.77 2010-03-12 14:35:17 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ExternalBytes.st,v 1.78 2010-04-08 11:57:17 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/ExternalBytes.st,v 1.77 2010-03-12 14:35:17 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ExternalBytes.st,v 1.78 2010-04-08 11:57:17 cg Exp $'
! !
ExternalBytes initialize!