From: gfx <gfuji@cpan.org>
Date: Sun, 6 Sep 2009 08:58:17 +0000 (+0900)
Subject: Use IsObject()
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7aa75e76e9ae4ebddd4a3d71b370af950e6c1c4b;p=gitmo%2FClass-MOP.git

Use IsObject()
---

diff --git a/xs/MOP.xs b/xs/MOP.xs
index c4af174..e7b5a5b 100644
--- a/xs/MOP.xs
+++ b/xs/MOP.xs
@@ -23,7 +23,7 @@ mop_is_instance_of(pTHX_ SV* const sv, SV* const klass){
     assert(sv);
     assert(klass);
 
-    if(SvROK(sv) && SvOBJECT(SvRV(sv)) && SvOK(klass)){
+    if(IsObject(sv) && SvOK(klass)){
         bool ok;
 
         ENTER;