blob: 217c00b8c2dc8c3763d3678166133ff8128c76cd (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
|
/* APPLE LOCAL file ObjC GC */
/* A run-time test for insertion of write barriers. */
/* { dg-do run { target *-*-darwin* } } */
/* { dg-options "-fnext-runtime -fobjc-gc" } */
#include <objc/objc.h>
#include <stdio.h>
#include <stdlib.h>
// callouts to these are generated with cc -fobjc-gc
int IvarAssigns;
id objc_assign_ivar(id value, id dest, unsigned int offset) {
id *slot = (id*) ((char *)dest + offset);
++IvarAssigns;
return (*slot = value);
}
// The test case elements;
@class NSObject;
@interface Foo {
@public
// assignments to any/all of these fields should generate objc_assign_ivar
Foo *obj[20];
short idx[5];
}
@end
int testIvars() {
Foo *foo = (Foo *)calloc(1,sizeof(Foo)); // don't call in ObjC
int counter = 0, errors = 0;
#define ASSIGNTEST(expr, global) expr = foo; if (!global) { printf(# expr " is busted\n"); ++errors; } global = 0;
ASSIGNTEST(foo->obj[5], IvarAssigns) // objc_assign_ivar
ASSIGNTEST(foo->obj[++counter], IvarAssigns) // objc_assign_ivar
foo->idx[++counter] = 15;
ASSIGNTEST(foo->obj[foo->idx[2]], IvarAssigns) // objc_assign_ivar
if (foo->obj[5] != foo || foo->obj[1] != foo || foo->obj[15] != foo)
abort();
return errors;
}
@implementation Foo
@end
int main(int argc, char *argv[]) {
return testIvars();
}
|
