ExternalAddress.st
changeset 7018 5ceb0daa7b1b
parent 6491 6976d9b69e01
child 7258 9ccdbee7d1ad
equal deleted inserted replaced
7017:03f1bd57c001 7018:5ceb0daa7b1b
   247     "
   247     "
   248 ! !
   248 ! !
   249 
   249 
   250 !ExternalAddress methodsFor:'printing & storing'!
   250 !ExternalAddress methodsFor:'printing & storing'!
   251 
   251 
   252 displayString
   252 printOn:aStream
   253     "return a printed representation of the receiver for displaying"
   253     "return a printed representation of the receiver"
   254 
   254 
   255     ^ self class name , ' at:' , (self address printStringRadix:16)
   255     self class name printOn:aStream.
   256 
   256     aStream nextPutAll:' at:'.
   257     "Modified: / 26.5.1998 / 16:11:50 / cg"
   257     self address printOn:aStream base:16.
   258 ! !
   258 ! !
   259 
   259 
   260 !ExternalAddress methodsFor:'private accessing'!
   260 !ExternalAddress methodsFor:'private accessing'!
   261 
   261 
   262 setAddress:anInteger
   262 setAddress:anInteger
   276 ! !
   276 ! !
   277 
   277 
   278 !ExternalAddress class methodsFor:'documentation'!
   278 !ExternalAddress class methodsFor:'documentation'!
   279 
   279 
   280 version
   280 version
   281     ^ '$Header: /cvs/stx/stx/libbasic/ExternalAddress.st,v 1.16 2002-04-09 18:58:14 stefan Exp $'
   281     ^ '$Header: /cvs/stx/stx/libbasic/ExternalAddress.st,v 1.17 2003-02-09 15:48:59 stefan Exp $'
   282 ! !
   282 ! !