#REFACTORING
class: SocketAddress
changed:
#domainCode (send #unsignedInt16At: instead of #unsignedShortAt:)
#domainCode: (send #unsignedInt16At:put: instead of #unsignedShortAt:put:)
--- a/SocketAddress.st Wed Mar 23 14:27:22 2016 +0100
+++ b/SocketAddress.st Wed Mar 23 14:32:15 2016 +0100
@@ -632,7 +632,7 @@
OperatingSystem isOSXlike ifTrue:[
^ self at:2
].
- ^ self unsignedShortAt:1
+ ^ self unsignedInt16At:1
!
domainCode:anInteger
@@ -645,7 +645,7 @@
self at:1 put:self size.
self at:2 put:anInteger.
] ifFalse:[
- self unsignedShortAt:1 put:anInteger
+ self unsignedInt16At:1 put:anInteger
].
!