1.1 --- a/templates/progops.c Sun Mar 26 01:50:19 2017 +0100
1.2 +++ b/templates/progops.c Sun Mar 26 17:41:56 2017 +0200
1.3 @@ -91,13 +91,13 @@
1.4 {
1.5 /* Allocate the tuple and fragment together. */
1.6
1.7 - __ref obj = (__ref) __ALLOCATE(1, __INSTANCESIZE(__builtins___tuple_tuple) + __FRAGMENT_SIZE(number));
1.8 - __attr self = __ATTRVALUE(obj);
1.9 + __attr self = __new(&__INSTANCETABLE(__builtins___tuple_tuple),
1.10 + &__builtins___tuple_tuple,
1.11 + __INSTANCESIZE(__builtins___tuple_tuple) + __FRAGMENT_SIZE(number), 0);
1.12
1.13 - /* Initialise the instance and fragment. */
1.14 + /* Initialise the fragment. */
1.15
1.16 - __init(obj, &__INSTANCETABLE(__builtins___tuple_tuple), &__builtins___tuple_tuple);
1.17 - __newdata_sequence(self, args, number, (__fragment *) ((void *) obj + __INSTANCESIZE(__builtins___tuple_tuple)));
1.18 + __newdata_sequence(self, args, number, (__fragment *) ((void *) __VALUE(self) + __INSTANCESIZE(__builtins___tuple_tuple)));
1.19 return self;
1.20 }
1.21