--- a/UninterpretedBytes.st Fri Dec 19 14:31:20 2003 +0100
+++ b/UninterpretedBytes.st Fri Dec 19 19:55:04 2003 +0100
@@ -1282,7 +1282,7 @@
%{
OBJ *pointer;
- if (__isExternalAddress(value)) {
+ if (__isExternalAddressLike(value)) {
pointer = __externalAddressVal(value);
} else if (__isExternalBytesLike(value)) {
pointer = __externalBytesVal(value);
@@ -2178,5 +2178,5 @@
!UninterpretedBytes class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/UninterpretedBytes.st,v 1.48 2003-12-19 13:31:20 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/UninterpretedBytes.st,v 1.49 2003-12-19 18:55:04 stefan Exp $'
! !