[plt-scheme] make-object not bound

The following is giving me grief.  I'm using 352.  Help please.


(module test
         mzscheme

   (define myFont (make-object font%
                    18 "Geneva"
                    'default 'normal 'normal #f 'smoothed #f))

   (provide (all-defined)))


expand: unbound variable in module in: make-object


- dr