--- a/WinWorkstation.st	Fri Feb 19 06:48:34 2016 +0000
+++ b/WinWorkstation.st	Sun Feb 21 09:13:19 2016 +0000
@@ -8178,6 +8178,17 @@
 %}
 !
 
+hdcForGC: gcId
+    "Private. Return a HDC (as ExternalAddress) associated with
+     given GC"
+%{
+    if (__isExternalAddressLike(gcId)) {
+        RETURN ( __MKEXTERNALADDRESS (_getDC ( _GCDATA(gcId) ) ) );
+    }	
+%}.
+    self primitiveFailed.
+!
+
 primCreateBitmapFromArray:anArray width:w height:h
 %{