[svn:parrot] r38170 - trunk/tools/build

NotFound at svn.parrot.org NotFound at svn.parrot.org
Fri Apr 17 10:51:03 UTC 2009


Author: NotFound
Date: Fri Apr 17 10:51:02 2009
New Revision: 38170
URL: https://trac.parrot.org/parrot/changeset/38170

Log:
[nci] check PMC_IS_NULL instead of NULL in build_call_func

Modified:
   trunk/tools/build/nativecall.pl

Modified: trunk/tools/build/nativecall.pl
==============================================================================
--- trunk/tools/build/nativecall.pl	Fri Apr 17 10:11:39 2009	(r38169)
+++ trunk/tools/build/nativecall.pl	Fri Apr 17 10:51:02 2009	(r38170)
@@ -554,9 +554,9 @@
     jit_key_name = Parrot_str_concat(interp, jit_key_name, signature, 0);
     b            = VTABLE_get_pmc_keyed_str(interp, HashPointer, jit_key_name);
 
-    PARROT_ASSERT((!b) || b->vtable);
+    PARROT_ASSERT(PMC_IS_NULL(b) || b->vtable);
 
-    if (b && b->vtable->base_type == enum_class_ManagedStruct) {
+    if ((!PMC_IS_NULL(b)) && b->vtable->base_type == enum_class_ManagedStruct) {
         *jitted = 1;
         return F2DPTR(VTABLE_get_pointer(interp, b));
     }


More information about the parrot-commits mailing list