Problem with MOP

[Thomas Wawrzinek]

Hello!

I just wanted to play around a little with GOOPSes MOP.

If I execute the following short script 

(use-modules (oop goops))
(define-class <mopped-class> (<class>))

with `guile -s script.scm', I get the following error:

ERROR: In procedure class-precedence-list:
ERROR: Wrong type argument in position 1: #<struct 401c0640:401c0640>

If I type these two lines to the interpreter, everything's fine. 

I'm using guile 1.4 with goops 0.9.0 on a SuSE Linux 6.4 box.

Regards,

                        Thomas