Author: petdance
Date: Thu Jun 14 19:33:06 2007
New Revision: 19016
Modified:
trunk/config/gen/core_pmcs.pm
Log:
Put in flag for the headerizer
Modified: trunk/config/gen/core_pmcs.pm
==============================================================================
--- trunk/config/gen/core_pmcs.pm (original)
+++ trunk/config/gen/core_pmcs.pm Thu Jun 14 19:33:06 2007
@@ -106,6 +106,9 @@
print {$OUT} <<"END_C";
+/* HEADER: none */
+/* This isn't strictly true, but the headerizer should not bother */
+
void Parrot_register_core_pmcs(Interp *interp, PMC* registry);
extern void Parrot_initialize_core_pmcs(Interp *interp);
void Parrot_initialize_core_pmcs(Interp *interp)
@@ -130,7 +133,7 @@
static void register_pmc(Interp *interp, PMC* registry, int pmc_id)
{
- STRING* key = interp->vtables[pmc_id]->whoami;
+ STRING* const key = interp->vtables[pmc_id]->whoami;
VTABLE_set_integer_keyed_str(interp, registry, key, pmc_id);
}
