(anymap-ocol-set! anymap ocol-value)
The procedures bitmap-ocol-set!, greymap-ocol-set!, graymap-ocol-set! and colormap-ocol-set! are aliases being bound to this primitive procedure for compatibility.
The ocol value of the anymap is set to the supplied value.
The new ocol value is returned.
> (define bitmap (bitmap-create 100 100))
bitmap
> bitmap
#<bitmap orow:-1 ocol:-1 xres:-1 yres:-1 h:100 w:100>
> (anymap-ocol-set! bitmap 500)
500
> bitmap
#<bitmap orow:-1 ocol:500 xres:-1 yres:-1 h:100 w:100>