equal
deleted
inserted
replaced
115 |
115 |
116 %{ /* NOCONTEXT */ |
116 %{ /* NOCONTEXT */ |
117 |
117 |
118 unsigned INT addr; |
118 unsigned INT addr; |
119 |
119 |
120 addr = (unsigned INT )__INST(address_); |
120 addr = (unsigned INT)__INST(address_); |
121 RETURN ( __MKUINT(addr)); |
121 RETURN ( __MKUINT(addr)); |
122 %} |
122 %} |
123 ! ! |
123 ! ! |
124 |
124 |
125 !ExternalAddress methodsFor:'comparing'! |
125 !ExternalAddress methodsFor:'comparing'! |
187 ! ! |
187 ! ! |
188 |
188 |
189 !ExternalAddress class methodsFor:'documentation'! |
189 !ExternalAddress class methodsFor:'documentation'! |
190 |
190 |
191 version |
191 version |
192 ^ '$Header: /cvs/stx/stx/libbasic/ExternalAddress.st,v 1.9 1997-08-20 08:00:14 stefan Exp $' |
192 ^ '$Header: /cvs/stx/stx/libbasic/ExternalAddress.st,v 1.10 1997-08-20 17:19:47 cg Exp $' |
193 ! ! |
193 ! ! |