[plt-scheme] Is collects/games/doors dead code?

Assuming that collects/games/doors is not dead, how does one instantiate 
door-game%?  My first guess of

    (require mred games/doors/doors)
    (define f (instantiate frame% ("Test") (width 700) (height 600)))
    (define g (instantiate door-game% ((f 6 6)))
    (send f show #t)

draws only an empty frame.  (It appears that the setup sequence needs to 
call new-player and new-thing with some image data....)

I was grepping for usages of bitmap->gl-list, and was intrigued.

Thanks,
Ben