Ticket #1819: updated_patch.txt

File updated_patch.txt, 1.5 KB (added by ellefu, 4 years ago)
Line 
1Index: tools/dev/mk_language_shell.in
2===================================================================
3--- tools/dev/mk_language_shell.in      (revision 49475)
4+++ tools/dev/mk_language_shell.in      (working copy)
5@@ -647,6 +647,8 @@
6     SUPER();
7 };
8
9+/*
10+
11 =item C<PMC* get()>
12
13 Returns a vector-like PMC.
14@@ -656,12 +658,9 @@
15 */
16
17     METHOD PMC* get() {
18-        PMC* property;
19-        INTVAL array_t;
20-        STRING* property_name;
21+        PMC* property = VTABLE_getprop(INTERP, SELF, property_name);
22+        STRING* property_name = string_from_literal(INTERP, "property");
23
24-        property_name = string_from_literal(INTERP, "property");
25-        shape = VTABLE_getprop(INTERP, SELF, property_name);
26         if (PMC_IS_NULL(property)) {
27            /*
28             * No property has been set yet. This means that we are
29@@ -671,7 +670,7 @@
30             * specify it?
31             */
32             /*
33-            array_t = Parrot_pmc_get_type_str(INTERP,
34+            INTVAL array_t = Parrot_pmc_get_type_str(INTERP,
35                 string_from_literal(INTERP, "@lang@"));
36             */
37             property = Parrot_pmc_new(INTERP, VTABLE_type(INTERP, SELF));
38@@ -710,7 +709,7 @@
39         old_property = VTABLE_getprop(INTERP, SELF, property_name);
40         VTABLE_setprop(INTERP, SELF, property_name, new_property);
41
42-        /* how big are these property? */
43+        /* how big are these properties? */
44         old_size = size(INTERP, SELF, old_property);
45         new_size = size(INTERP, SELF, new_property);
46