[svn:parrot] r38039 - in trunk: compilers/pirc/src include/parrot
cotto at svn.parrot.org
cotto at svn.parrot.org
Fri Apr 10 22:15:41 UTC 2009
Author: cotto
Date: Fri Apr 10 22:15:40 2009
New Revision: 38039
URL: https://trac.parrot.org/parrot/changeset/38039
Log:
[PMC] PMC_str_val is history
Modified:
trunk/compilers/pirc/src/bcgen.c
trunk/include/parrot/pobj.h
Modified: trunk/compilers/pirc/src/bcgen.c
==============================================================================
--- trunk/compilers/pirc/src/bcgen.c Fri Apr 10 22:12:37 2009 (r38038)
+++ trunk/compilers/pirc/src/bcgen.c Fri Apr 10 22:15:40 2009 (r38039)
@@ -10,6 +10,7 @@
#include "parrot/interpreter.h"
#include "../../../src/pmc/pmc_sub.h"
+#include "../../../src/pmc/pmc_namespace.h"
/* #include "parrot/embed.h" */
@@ -988,8 +989,9 @@
switch (ns->entry_type) {
case MULTI_TYPE_IDENT: {
- PMC *namespace_pmc = constant_pmc_new(bc->interp, enum_class_String);
- PMC_str_val(namespace_pmc) = add_string_const_from_cstring(bc, ns->entry.ident);
+ PMC *namespace_pmc = constant_pmc_new(bc->interp, enum_class_String);
+ PARROT_NAMESPACE(namespace_pmc)->name =
+ add_string_const_from_cstring(bc, ns->entry.ident);
break;
}
case MULTI_TYPE_KEYED:
Modified: trunk/include/parrot/pobj.h
==============================================================================
--- trunk/include/parrot/pobj.h Fri Apr 10 22:12:37 2009 (r38038)
+++ trunk/include/parrot/pobj.h Fri Apr 10 22:15:40 2009 (r38039)
@@ -57,7 +57,6 @@
#define PObj_buflen(pmc) (pmc)->cache._b._buflen
#define PMC_struct_val(pmc) (pmc)->cache._ptrs._struct_val
#define PMC_int_val(pmc) (pmc)->cache._i._int_val
-#define PMC_str_val(pmc) (pmc)->cache._string_val
/* See src/gc/resources.c. the basic idea is that buffer memory is
set up as follows:
More information about the parrot-commits
mailing list