Fix type for make-brush

Related to PR 14899
This commit is contained in:
Asumu Takikawa 2015-01-12 18:35:52 -05:00
parent ded837ce10
commit 4f05adcd19

View File

@ -108,7 +108,7 @@
-Real -Real -Real -Real -Real))
#f
#:immutable? Univ #f
(-inst (parse-type #'Bitmap%)))]
(-inst (parse-type #'Brush%)))]
[make-color
(->optkey -Byte -Byte -Byte
[-Real]