Fix SUBTYPEP when called with a compound type and class object.
Fix SUBTYPEP when called with a compound type and class object.

rvedam/Mezzano,varjagg/Mezzano,varjagg/Mezzano,froggey/Mezzano,froggey/Mezzano,rvedam/Mezzano