RosettaCodeData/Task/Address-of-a-variable/Smalltalk/address-of-a-variable-2.st
2013-04-10 14:58:50 -07:00

4 lines
73 B
Smalltalk

|ptr|
ptr := ExternalBytes new:10.
ptr address.
ptr byteAt:1 put: 16rFF.