whalesong/tests/more-tests/colors.rkt
2011-07-06 21:28:11 -04:00

12 lines
200 B
Racket

#lang planet dyoo/whalesong
(require (planet dyoo/whalesong/image))
(color 3 4 5 0)
(make-color 3 5 7 0)
(define c1 (color 3 1 4 5))
(color-red c1)
(color-green c1)
(color-blue c1)
(color-alpha c1)