equal
deleted
inserted
replaced
8181 hdcForGC: gcId |
8181 hdcForGC: gcId |
8182 "Private. Return a HDC (as ExternalAddress) associated with |
8182 "Private. Return a HDC (as ExternalAddress) associated with |
8183 given GC" |
8183 given GC" |
8184 %{ |
8184 %{ |
8185 if (__isExternalAddressLike(gcId)) { |
8185 if (__isExternalAddressLike(gcId)) { |
8186 RETURN ( __MKEXTERNALADDRESS (_getDC ( _GCDATA(gcId) ) ) ); |
8186 HDC dc = _getDC ( _GCDATA(gcId) ); |
|
8187 _GCDATA(gcId)->doNotCacheOrRelease = 1; |
|
8188 RETURN ( __MKEXTERNALADDRESS ( dc ) ); |
8187 } |
8189 } |
8188 %}. |
8190 %}. |
8189 self primitiveFailed. |
8191 self primitiveFailed. |
8190 ! |
8192 ! |
8191 |
8193 |