From 4e33afc1005d4c1681a894a5ef845636f4847acc Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Fri, 4 Feb 2011 07:11:48 -0700
Subject: [PATCH] fix dc<%>  Closes PR 11706  Merge to 5.1 (cherry picked from
 commit 913f6b54868d594e4d47b84618df353f418a1805)

---
 collects/racket/draw/private/dc-intf.rkt | 68 +++++++++++++++++++++++-
 1 file changed, 67 insertions(+), 1 deletion(-)

diff --git a/collects/racket/draw/private/dc-intf.rkt b/collects/racket/draw/private/dc-intf.rkt
index d0f9801192..c5f53ec415 100644
--- a/collects/racket/draw/private/dc-intf.rkt
+++ b/collects/racket/draw/private/dc-intf.rkt
@@ -6,4 +6,70 @@
 
 (define dc<%>
   (interface ()
-    draw-text))
+    cache-font-metrics-key
+    clear
+    copy
+    draw-arc
+    draw-bitmap
+    draw-bitmap-section
+    draw-ellipse
+    draw-line
+    draw-lines
+    draw-path
+    draw-point
+    draw-polygon
+    draw-rectangle
+    draw-rounded-rectangle
+    draw-spline
+    draw-text
+    end-doc
+    end-page
+    erase
+    flush
+    get-alpha
+    get-background
+    get-brush
+    get-char-height
+    get-char-width
+    get-clipping-region
+    get-font
+    get-gl-context
+    get-initial-matrix
+    get-origin
+    get-pen
+    get-rotation
+    get-scale
+    get-size
+    get-smoothing
+    get-text-background
+    get-text-extent
+    get-text-foreground
+    get-text-mode
+    get-transformation
+    glyph-exists?
+    ok?
+    resume-flush
+    rotate
+    scale
+    set-alpha
+    set-background
+    set-brush
+    set-clipping-rect
+    set-clipping-region
+    set-font
+    set-initial-matrix
+    set-origin
+    set-pen
+    set-rotation
+    set-scale
+    set-smoothing
+    set-text-background
+    set-text-foreground
+    set-text-mode
+    set-transformation
+    start-doc
+    start-page
+    suspend-flush
+    transform
+    translate
+    try-color))