Forgot to check this
svn: r18312
This commit is contained in:
parent
f60645da2c
commit
7e6b4757fa
|
@ -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;
|
||||
|
|
Loading…
Reference in New Issue
Block a user