[svn:parrot] r48352 - branches/gsoc_instrument/src/pmc

cotto at svn.parrot.org cotto at svn.parrot.org
Mon Aug 9 03:43:19 UTC 2010


Author: cotto
Date: Mon Aug  9 03:42:55 2010
New Revision: 48352
URL: https://trac.parrot.org/parrot/changeset/48352

Log:
remove some unneeded changes to Task

Modified:
   branches/gsoc_instrument/src/pmc/task.pmc

Modified: branches/gsoc_instrument/src/pmc/task.pmc
==============================================================================
--- branches/gsoc_instrument/src/pmc/task.pmc	Mon Aug  9 01:55:28 2010	(r48351)
+++ branches/gsoc_instrument/src/pmc/task.pmc	Mon Aug  9 03:42:55 2010	(r48352)
@@ -110,10 +110,6 @@
 
 An interpreter in which to execute this task.
 
-=item C<data>
-
-Additional data for the task.
-
 =back
 
 =cut
@@ -172,9 +168,7 @@
             core_struct->birthtime = 0.0;
 
         core_struct->codeblock = VTABLE_get_pmc_keyed_str(INTERP, data, CONST_STRING(INTERP, "code"));
-        core_struct->data      = VTABLE_get_pmc_keyed_str(INTERP, data, CONST_STRING(INTERP, "data"));
-
-        core_struct->interp = (Parrot_Interp)VTABLE_get_pmc_keyed_str(INTERP, data, CONST_STRING(INTERP, "interp"));
+        core_struct->interp = (Parrot_Interp)VTABLE_get_pmc_keyed_str(INTERP, data, CONST_STRING(INTERP, "data"));
     }
 
 /*
@@ -239,9 +233,6 @@
             value = Parrot_pmc_new(INTERP, enum_class_Float);
             VTABLE_set_number_native(INTERP, value, core_struct->birthtime);
         }
-        else if (Parrot_str_equal(INTERP, name, CONST_STRING(INTERP, "data"))) {
-            value = core_struct->data;
-        }
         else {
             value = PMCNULL;
         }


More information about the parrot-commits mailing list