[plt-scheme] changing code font size in slideshow

From: Noel Welsh (noelwelsh at gmail.com)
Date: Wed Nov 18 15:44:05 EST 2009

More idiomatic would be to reverse the arguments, allow multiple
"code" expressions, and call it with-font-size:

(define-syntax with-font-size
  (syntax-rules ()
    [(with-font-size size expr ...)
        ([current-font-size size])
        expr ...)]))



On Sat, Nov 14, 2009 at 11:05 AM, Aleix Conchillo Flaqué
<aleix at member.fsf.org> wrote:
> I have defined this to help changing code size and avoid writing
> parameterize each time. I'm very newbie, so probably there's a much
> better way to do it. I used (plai-code) because I'm doing a slides for
> some PLAI chapters.
> (define-syntax plai-code
>  (syntax-rules ()
>    [(plai-code code) code]
>    [(plai-code code font-size) (parameterize
>                                   ([current-font-size font-size]) code)]))
> (plai-code (code ...))
> (plai-code (code ...) 26)

Posted on the users mailing list.