Ticket #1819: patch.txt

File patch.txt, 1.3 KB (added by ellefu, 4 years ago)

Patch for mk_language_shell.pl bug

Line 
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