bitmap-equal?

Synopsis

(bitmap-equal? bitmap1 bitmap2)

Parameters

  • bitmap1
  • bitmap2

Description

Side Effects

Return Value

Either #t (the two bitmaps have the same dimensions and content) or #f.

Example

> (define bitmap (bitmap-create 640 480))
bitmap
> (bitmap-equal? bitmap (greymap->bitmap (bitmap->greymap bitmap)))
#t
>