[racket] Slideshow's current-font-size 1-255

Hello,

I was trying to make a slide with a large symbol on it.

#lang slideshow
(slide
 (parameterize ([current-font-size 280])
   (t "\u2623")))

That gives a contract violation, saying that current-font-size isn't
(between/c 1 255).

Why can't we have font sizes larger than 255?


BTW, I am able to get a large pict by scaling (though, then, with rough
edges):

(slide
 (scale/improve-new-text (t "\u2623") 20))


[]'s

Rodolfo Carvalho
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.racket-lang.org/users/archive/attachments/20120316/a125eb49/attachment.html>