SocketAddress.st
changeset 3227 553baaf6c227
parent 3076 a71f5a3d6226
child 3286 9c62bd367418
equal deleted inserted replaced
3226:d439384d80bd 3227:553baaf6c227
   160     |addressList sa|
   160     |addressList sa|
   161 
   161 
   162     LastName = name ifTrue:[
   162     LastName = name ifTrue:[
   163         LastPort = portNrOrName ifTrue:[
   163         LastPort = portNrOrName ifTrue:[
   164             LastType = socketTypeSymbol ifTrue:[
   164             LastType = socketTypeSymbol ifTrue:[
   165                 Timestamp now - LastTime <= 30 ifTrue:[
   165                 (Timestamp now secondDeltaFrom: LastTime) <= 30 ifTrue:[
   166                     ^ LastAddr 
   166                     ^ LastAddr 
   167                 ]
   167                 ]
   168             ]
   168             ]
   169         ]
   169         ]
   170     ].
   170     ].
   808 ! !
   808 ! !
   809 
   809 
   810 !SocketAddress class methodsFor:'documentation'!
   810 !SocketAddress class methodsFor:'documentation'!
   811 
   811 
   812 version
   812 version
   813     ^ '$Header: /cvs/stx/stx/libbasic2/SocketAddress.st,v 1.42 2013-08-09 14:30:23 cg Exp $'
   813     ^ '$Header: /cvs/stx/stx/libbasic2/SocketAddress.st,v 1.43 2014-04-16 22:07:12 cg Exp $'
   814 !
   814 !
   815 
   815 
   816 version_CVS
   816 version_CVS
   817     ^ '$Header: /cvs/stx/stx/libbasic2/SocketAddress.st,v 1.42 2013-08-09 14:30:23 cg Exp $'
   817     ^ '$Header: /cvs/stx/stx/libbasic2/SocketAddress.st,v 1.43 2014-04-16 22:07:12 cg Exp $'
   818 ! !
   818 ! !
   819 
   819