equal
deleted
inserted
replaced
191 self sizeOfPointer |
191 self sizeOfPointer |
192 " |
192 " |
193 |
193 |
194 "Created: / 15-11-2016 / 11:40:52 / cg" |
194 "Created: / 15-11-2016 / 11:40:52 / cg" |
195 ! ! |
195 ! ! |
196 |
|
197 |
196 |
198 !ExternalAddress methodsFor:'Compatibility-Squeak'! |
197 !ExternalAddress methodsFor:'Compatibility-Squeak'! |
199 |
198 |
200 beNull |
199 beNull |
201 self setAddress:0 |
200 self setAddress:0 |
323 (ExternalAddress newAddress:16r12345678) asExternalBytes |
322 (ExternalAddress newAddress:16r12345678) asExternalBytes |
324 " |
323 " |
325 ! |
324 ! |
326 |
325 |
327 copyCStringFromHeap |
326 copyCStringFromHeap |
|
327 "fetch a 0-terminated string from my pointed-to address" |
|
328 |
328 ^ self asExternalBytes copyCStringFromHeap |
329 ^ self asExternalBytes copyCStringFromHeap |
|
330 |
|
331 "Modified (comment): / 13-02-2017 / 02:48:55 / cg" |
329 ! ! |
332 ! ! |
330 |
333 |
331 !ExternalAddress methodsFor:'printing & storing'! |
334 !ExternalAddress methodsFor:'printing & storing'! |
332 |
335 |
333 printOn:aStream |
336 printOn:aStream |