[svn:parrot] r41880 - branches/pcc_reapply/src/ops

[chromatic at svn.parrot.org]

Author: chromatic
Date: Thu Oct 15 09:34:07 2009
New Revision: 41880
URL: https://trac.parrot.org/parrot/changeset/41880

Log:
[ops] Removed another gc_unregister_pmc() now unused from set_returns op.  See
r41877.

Modified:
   branches/pcc_reapply/src/ops/core.ops

Modified: branches/pcc_reapply/src/ops/core.ops
==============================================================================
--- branches/pcc_reapply/src/ops/core.ops	Thu Oct 15 09:02:52 2009	(r41879)
+++ branches/pcc_reapply/src/ops/core.ops	Thu Oct 15 09:34:07 2009	(r41880)
@@ -571,22 +571,16 @@
 
 op set_returns(inconst PMC) :flow {
     opcode_t * const raw_returns = CUR_OPCODE;
-    PMC *ctx, *caller_ctx;
-    PMC *call_object;
-    PMC *signature = $1;
-    INTVAL argc;
-
-    ctx                     = CURRENT_CONTEXT(interp);
-    caller_ctx              = Parrot_pcc_get_caller_ctx(interp, ctx);
-    call_object             = Parrot_pcc_get_signature(interp, caller_ctx);
+    PMC      *signature          = $1;
+    PMC      *ctx                = CURRENT_CONTEXT(interp);
+    PMC      *caller_ctx         = Parrot_pcc_get_caller_ctx(interp, ctx);
+    PMC      *call_object        = Parrot_pcc_get_signature(interp, caller_ctx);
+    INTVAL    argc               = VTABLE_elements(interp, signature);
 
     Parrot_pcc_fill_returns_from_op(interp, call_object, signature, raw_returns);
 
-    if (!PMC_IS_NULL(call_object))
-        gc_unregister_pmc(interp, call_object);
     Parrot_pcc_set_signature(interp, ctx, NULL);
 
-    argc = VTABLE_elements(interp, signature);
     goto OFFSET(argc + 2);
 }