fixed image equality

svn: r14917
This commit is contained in:
Robby Findler 2009-05-22 01:55:48 +00:00
parent bf001f811d
commit d1a88fadde

View File

@ -1104,7 +1104,7 @@
(send mask2 ok?)
(= w (send mask2 get-width))
(= h (send mask2 get-height)))
(send mask get-argb-pixels 0 0 w h s1 #t)))
(send mask2 get-argb-pixels 0 0 w h s2 #t)))
(equal? s1 s2)))))))
(define/private (do-hash-code hash-code)