Forgot to check this

svn: r18312
This commit is contained in:
Stevie Strickland 2010-02-23 22:40:07 +00:00
parent f60645da2c
commit 7e6b4757fa

View File

@ -467,7 +467,7 @@ Scheme_Object *objscheme_unwrap(Scheme_Object *obj, Scheme_Object *c)
Scheme_Object *s[1], *unwrapper, *unwrap_prop;
Scheme_Class *cls = (Scheme_Class *)cls;
if (!obj)
if (!obj || !cls)
return NULL;
unwrap_prop = cls->unwrap_property;