[racket] Slideshow: change baseline

On Wed, May 22, 2013 at 3:47 PM, Matthew Flatt <mflatt at cs.utah.edu> wrote:

> (define (frac a b)
>   (lift-above-baseline
>    (vc-append
>     a
>     (hline (max (pict-width a) (pict-width b)) 20)
>     b)
>    (- (pict-descent b) (pict-height b))))
>
> (slide (hbl-append (t "x=") (frac (t "1234") (t "5678"))))



Indeed it works! I had tried with negative values but I probably had done
it wrong then.
Thank you!

Laurent
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.racket-lang.org/users/archive/attachments/20130522/02390aa8/attachment.html>