eliminate useless use of private1 flag on NCI PMC

git-svn-id: https://svn.parrot.org/parrot/trunk@44919 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
fernandobrito · Mar 14, 2010 · 5eb693f · 5eb693f
1 parent 2dda92a
commit 5eb693f
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 2 deletions.
diff --git a/src/extend.c b/src/extend.c
@@ -1361,7 +1361,6 @@ Parrot_sub_new_from_c_func(PARROT_INTERP,
         (char *) NULL, 0);
     Parrot_PMC sub = Parrot_pmc_new(interp, enum_class_NCI);
     VTABLE_set_pointer_keyed_str(interp, sub, sig, F2DPTR(func));
-    PObj_get_FLAGS(sub) |= PObj_private1_FLAG;
     return sub;
 }
 

diff --git a/src/ops/core.ops b/src/ops/core.ops
@@ -1277,7 +1277,6 @@ op dlfunc(out PMC, invar PMC, in STR, in STR) {
     else {
         $1 = Parrot_pmc_new(interp, enum_class_NCI);
         VTABLE_set_pointer_keyed_str(interp, $1, $4, F2DPTR(p));
-        PObj_get_FLAGS($1) |= PObj_private1_FLAG;
     }
     Parrot_str_free_cstring(name);
 }