[plt-scheme] Slideshow and pretty-print

Hi,

I get two questions:

1. in slideshow, why code could not print my s-exp good?

2. How can I reserve the annotations when I apply pretty-print ?

below is the demo code, thanks!


(module pretty-print-test (lib "slideshow.ss" "slideshow")
  (require (lib "pretty.ss")
           (lib "code.ss" "slideshow"))


  (define code-test '(code "DrScheme" "DrScheme"
                           "DrScheme" (break one) (break two) "DrScheme"
"DrScheme"
                           (break three) "DrScheme"))

  (slide/center
   (code #,code-test))

  ;; it is different in REPL


  (define test
      '(this is
             ;;annotation
             a test))
  (define ptest
    (pretty-format test))

  (slide/center
   (code #,ptest)))


Gang
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.racket-lang.org/users/archive/attachments/20071126/6b991754/attachment.html>