From c7caf99e2492d4076faff6523f985d2239f47363 Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Wed, 28 Jul 2004 15:13:16 +0000
Subject: [PATCH] .

original commit: b5603265e0c50bf1593a2d546f0190dfa78d3b67
---
 collects/mrlib/cache-image-snip.ss | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/collects/mrlib/cache-image-snip.ss b/collects/mrlib/cache-image-snip.ss
index 3870cb05..68ad469c 100644
--- 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)