@@ -13,79 +13,79 @@ pmclass SerializationContext auto_attrs dynpmc group nqp {
13
13
14
14
VTABLE void init() {
15
15
PMC *root_objects = Parrot_pmc_new(interp, enum_class_ResizablePMCArray);
16
- SETATTR_SerializationContext_root_objects (interp, SELF, root_objects);
16
+ SET_ATTR_root_objects (interp, SELF, root_objects);
17
17
PObj_custom_mark_SET(SELF);
18
18
}
19
19
20
20
VTABLE void set_string_native(STRING *handle) {
21
- SETATTR_SerializationContext_handle (interp, SELF, handle);
21
+ SET_ATTR_handle (interp, SELF, handle);
22
22
}
23
23
24
24
VTABLE void mark() {
25
25
PMC *root_objects;
26
26
STRING *handle, *description;
27
- GETATTR_SerializationContext_root_objects (interp, SELF, root_objects);
27
+ GET_ATTR_root_objects (interp, SELF, root_objects);
28
28
Parrot_gc_mark_PMC_alive(INTERP, root_objects);
29
- GETATTR_SerializationContext_handle (interp, SELF, handle);
29
+ GET_ATTR_handle (interp, SELF, handle);
30
30
Parrot_gc_mark_STRING_alive(INTERP, handle);
31
- GETATTR_SerializationContext_description (interp, SELF, description);
31
+ GET_ATTR_description (interp, SELF, description);
32
32
Parrot_gc_mark_STRING_alive(INTERP, description);
33
33
}
34
34
35
35
VTABLE PMC* get_pmc_keyed_int(INTVAL idx) {
36
36
PMC *root_objects;
37
- GETATTR_SerializationContext_root_objects (interp, SELF, root_objects);
37
+ GET_ATTR_root_objects (interp, SELF, root_objects);
38
38
return VTABLE_get_pmc_keyed_int(interp, root_objects, idx);
39
39
}
40
40
41
41
VTABLE PMC* get_pmc_keyed(PMC *idx) {
42
42
PMC *root_objects;
43
- GETATTR_SerializationContext_root_objects (interp, SELF, root_objects);
43
+ GET_ATTR_root_objects (interp, SELF, root_objects);
44
44
return VTABLE_get_pmc_keyed(interp, root_objects, idx);
45
45
}
46
46
47
47
VTABLE void set_pmc_keyed_int(INTVAL idx, PMC *value) {
48
48
PMC *root_objects;
49
- GETATTR_SerializationContext_root_objects (interp, SELF, root_objects);
49
+ GET_ATTR_root_objects (interp, SELF, root_objects);
50
50
VTABLE_set_pmc_keyed_int(interp, root_objects, idx, value);
51
51
}
52
52
53
53
VTABLE void set_pmc_keyed(PMC *idx, PMC *value) {
54
54
PMC *root_objects;
55
- GETATTR_SerializationContext_root_objects (interp, SELF, root_objects);
55
+ GET_ATTR_root_objects (interp, SELF, root_objects);
56
56
VTABLE_set_pmc_keyed(interp, root_objects, idx, value);
57
57
}
58
58
59
59
METHOD INTVAL elems() {
60
60
PMC *root_objects;
61
61
INTVAL elems;
62
- GETATTR_SerializationContext_root_objects (interp, SELF, root_objects);
62
+ GET_ATTR_root_objects (interp, SELF, root_objects);
63
63
elems = VTABLE_elements(interp, root_objects);
64
64
RETURN (INTVAL elems);
65
65
}
66
66
67
67
METHOD STRING* handle() {
68
68
STRING *handle;
69
- GETATTR_SerializationContext_handle (interp, SELF, handle);
69
+ GET_ATTR_handle (interp, SELF, handle);
70
70
RETURN (STRING* handle);
71
71
}
72
72
73
73
METHOD set_description(STRING *description) {
74
- SETATTR_SerializationContext_description (interp, SELF, description);
74
+ SET_ATTR_description (interp, SELF, description);
75
75
RETURN (STRING* description);
76
76
}
77
77
78
78
METHOD STRING* description() {
79
79
STRING *description;
80
- GETATTR_SerializationContext_description (interp, SELF, description);
80
+ GET_ATTR_description (interp, SELF, description);
81
81
RETURN (STRING* description);
82
82
}
83
83
84
84
METHOD INTVAL slot_index_for(PMC *obj) {
85
85
/* This is kinda stupid, but it'll do for now. */
86
86
PMC *root_objects;
87
87
INTVAL i, count;
88
- GETATTR_SerializationContext_root_objects (interp, SELF, root_objects);
88
+ GET_ATTR_root_objects (interp, SELF, root_objects);
89
89
count = VTABLE_elements(interp, root_objects);
90
90
for (i = 0; i < count; i++) {
91
91
if (VTABLE_get_pmc_keyed_int(interp, root_objects, i) == obj) {
0 commit comments