Interim commit, compiles. We need to bring in support code now.
[akaros.git] / scripts / spatch / plan9.cocci
1 @ print@
2 @@
3 -print(
4 +printd(
5 ...)
6
7 @ channel @
8 identifier d;
9 @@
10 -Chan
11 +struct chan
12 d;
13
14 @ channelstar @
15 identifier d;
16 @@
17 -Chan *
18 +struct chan *
19 d;
20
21 @mount@
22 identifier d;
23 @@
24 -Mount
25 +struct mount
26 d;
27
28 @ mountstar @
29 identifier d;
30 @@
31 -Chan *
32 +struct mount *
33 d;
34
35 @uvlong@
36 identifier d;
37 @@
38 -uvlong
39 +uint64_t
40 d;
41 @vlong@
42 identifier d;
43 @@
44 -vlong
45 +int64_t
46 d;
47 @ulong@
48 identifier d;
49 @@
50 -ulong
51 +uint32_t
52 d;
53 @ushort@
54 identifier d;
55 @@
56 -ushort
57 +uint16_t
58 d;
59
60 @ rulesm @
61 identifier t;
62 identifier f;
63 expression E1;
64 type T;
65 @@
66 T f(...){<...
67 t = smalloc(E1);
68 ...>}
69 @@
70 identifier rulesm.f;
71 expression E1;
72 @@
73
74 - smalloc(E1
75 + kzmalloc(E1, 0
76    )
77
78 @ rulem @
79 identifier t;
80 identifier f;
81 expression E1;
82 type T;
83 @@
84 T f(...){<...
85 t = malloc(E1);
86 ...>}
87 @@
88 identifier rulem.f;
89 expression E1;
90 @@
91
92 - malloc(E1
93 + kzmalloc(E1, 0
94    )
95
96 @@
97 @@
98 -getcallerpc(...);
99 @@
100 @@
101 -setmalloctag(...);
102
103 @@
104 type T;
105 @@
106 -T validname0(...){...}
107
108 @@
109 type T;
110 @@
111 -T kstrcpy(...){...}
112
113 @@
114 @@
115 -if (up){
116 +if (current){
117 ...  } else {...}
118
119 @@
120 expression E;
121 @@
122 -strcpy(up->errstr,
123 +set_errstr(
124 E)
125 @@
126 @@
127 -saveregisters(...);
128 @@
129 @@
130 -saveregisters(...){...}
131 @@
132 @@
133 +//
134 muxclose(...);