.

original commit: b5603265e0c50bf1593a2d546f0190dfa78d3b67
2004-07-28 15:13:16 +00:00 · 2004-07-28 15:13:16 +00:00 · c7caf99e24
commit c7caf99e24
parent ec4f57ec58
1 changed files with 4 additions and 0 deletions
--- a/collects/mrlib/cache-image-snip.ss
+++ b/collects/mrlib/cache-image-snip.ss
@ -102,6 +102,10 @@
          (argb-proc argb 0 0))
        argb)
      
+      ;; get-argb/no-compute : -> (union #f argb)
+      (define/public (get-argb/no-compute)
+        argb)
+      
      (define/override (get-extent dc x y w h descent space lspace rspace)
        (set-box/f! w width)
        (set-box/f! h height)