Fix contract on set-argb-pixels

2012-04-01 01:54:33 -04:00 · 2012-04-01 01:54:33 -04:00 · 4c022046d5
commit 4c022046d5
parent 4360e62c22
1 changed files with 1 additions and 1 deletions
--- a/collects/racket/draw/contracts.rkt
+++ b/collects/racket/draw/contracts.rkt
@ -336,7 +336,7 @@
                    exact-nonnegative-integer?
                    exact-nonnegative-integer?
                    exact-nonnegative-integer?
-                    (and/c bytes? (not/c immutable?)))
+                    bytes?)
                   (any/c any/c)
                   void?)]
           [set-bitmap (->m (or/c (is-a?/c bitmap%) #f) void?)]