get-dc-proc in cache-image-snip%

• (send a-cache-image-snip get-dc-proc) -> (union #f ((is-a?/c dc<%>) int[dx] int[dy] -> void))

  Either returns false, or a procedure that draws the contents of this snip into a dc.