[racket] scribble examples using student language printer

From: David Van Horn (dvanhorn at ccs.neu.edu)
Date: Sun Nov 7 01:51:29 EDT 2010

Is there a way to make scribble render the result of evaluating examples 
as if the examples were run in a student language in DrRacket?

Eg., I'd like to see:

   > (define-struct s (f))
   > (make-s 1)
   (make-s 1)

But when I do:

#lang scribble/doc
@(require scribble/eval
           (for-label lang/htdp-intermediate-lambda))

@(define the-eval
   (let ([the-eval (make-base-eval)])
     (the-eval '(require lang/htdp-intermediate-lambda))

@interaction[#:eval the-eval
   (define-struct s (f))
   (make-s 1)]

I see instead:

   > (define-struct s (f))
   > (make-s 1)
   (s 1 #f)


Posted on the users mailing list.