1 | --- tools/dev/mk_language_shell.in (revision 49475) |
---|
2 | +++ tools/dev/mk_language_shell.in (working copy) |
---|
3 | @@ -656,12 +656,9 @@ |
---|
4 | */ |
---|
5 | |
---|
6 | METHOD PMC* get() { |
---|
7 | - PMC* property; |
---|
8 | - INTVAL array_t; |
---|
9 | - STRING* property_name; |
---|
10 | + PMC* property = VTABLE_getprop(INTERP, SELF, property_name); |
---|
11 | + STRING* property_name = string_from_literal(INTERP, "property"); |
---|
12 | |
---|
13 | - property_name = string_from_literal(INTERP, "property"); |
---|
14 | - shape = VTABLE_getprop(INTERP, SELF, property_name); |
---|
15 | if (PMC_IS_NULL(property)) { |
---|
16 | /* |
---|
17 | * No property has been set yet. This means that we are |
---|
18 | @@ -671,7 +668,7 @@ |
---|
19 | * specify it? |
---|
20 | */ |
---|
21 | /* |
---|
22 | - array_t = Parrot_pmc_get_type_str(INTERP, |
---|
23 | + INTVAL array_t = Parrot_pmc_get_type_str(INTERP, |
---|
24 | string_from_literal(INTERP, "@lang@")); |
---|
25 | */ |
---|
26 | property = Parrot_pmc_new(INTERP, VTABLE_type(INTERP, SELF)); |
---|
27 | @@ -710,7 +707,7 @@ |
---|
28 | old_property = VTABLE_getprop(INTERP, SELF, property_name); |
---|
29 | VTABLE_setprop(INTERP, SELF, property_name, new_property); |
---|
30 | |
---|
31 | - /* how big are these property? */ |
---|
32 | + /* how big are these properties? */ |
---|
33 | old_size = size(INTERP, SELF, old_property); |
---|
34 | new_size = size(INTERP, SELF, new_property); |
---|
35 | |
---|