[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