[plt-scheme] plt scheme teaching language printing format

Hi,

If I want the power of module language but I want the expressions to
be displayed as in the teaching languages, how can I do that?

For example, if I want to make (a b) to be displayed like (cons 'a
(cons 'b empty)), what shall I do?

Chris