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

fix `record-dc%' test

Browse Source 
Merge to 5.3
This commit is contained in:
Matthew Flatt 2012-04-10 22:43:07 -06:00
parent 76bbc1a89f
commit 7b322c151d
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
collects/tests/gracket/record-dc.rkt
View File

@ -1,7 +1,9 @@
#lang racket/base #lang racket/base
(require racket/class (require racket/class
racket/draw racket/draw
racket/draw/private/record-dc) (only-in racket/draw/private/record-dc
record-dc-mixin
get-recorded-command))
(define bm1 (make-bitmap 100 100)) (define bm1 (make-bitmap 100 100))
(define bm2 (make-bitmap 100 100)) (define bm2 (make-bitmap 100 100))
@ -48,7 +50,7 @@
(define cms (send dc2 get-recorded-command)) (define cms (send dc2 get-recorded-command))
(cms dc3) (void (cms dc3))
(define post-bytes (get-bytes bm3)) (define post-bytes (get-bytes bm3))