suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

.

Browse Source 
original commit: b5603265e0c50bf1593a2d546f0190dfa78d3b67
This commit is contained in:
Robby Findler 2004-07-28 15:13:16 +00:00
parent ec4f57ec58
commit c7caf99e24
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/mrlib/cache-image-snip.ss
View File

@ -102,6 +102,10 @@
(argb-proc argb 0 0)) (argb-proc argb 0 0))
argb) 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) (define/override (get-extent dc x y w h descent space lspace rspace)
(set-box/f! w width) (set-box/f! w width)
(set-box/f! h height) (set-box/f! h height)