[racket] ] Converting symbols to procedures?

Here’s another example of my problem:

#lang racket

(define foo%
  (class object%
    (super-new)
    (field [x 0])))
(define bar%
  (class object%
    (super-new)
    (field [x 0])))

∏(apply make-object '(foo% bar%))

This doesn’t work because the make-object is being passed symbols instead of classes.  If I wrap make-object in a function that does an eval on the symbol I run into another problem dealing with namespaces. 

-Kevin