Lines Matching refs:C
50 my @C = map("%r$_",(0,1,5..7));
65 { my @C = @C; # copy, because we mess them up...
75 lg @C[0],$A[4][0]($src)
76 lg @C[1],$A[4][1]($src)
77 lg @C[2],$A[4][2]($src)
78 lg @C[3],$A[4][3]($src)
79 lg @C[4],$A[4][4]($src)
90 xgr @C[0],@D[0]
91 xg @C[1],$A[0][1]($src)
92 xg @C[2],$A[0][2]($src)
93 xg @C[3],$A[0][3]($src)
94 lgr @D[4],@C[4]
95 xg @C[4],$A[0][4]($src)
97 xg @C[0],$A[1][0]($src)
98 xgr @C[1],@D[1]
99 xg @C[2],$A[1][2]($src)
100 xg @C[3],$A[1][3]($src)
101 xg @C[4],$A[1][4]($src)
103 xg @C[0],$A[2][0]($src)
104 xg @C[1],$A[2][1]($src)
105 xgr @C[2],@D[2]
106 xg @C[3],$A[2][3]($src)
107 xg @C[4],$A[2][4]($src)
109 xg @C[0],$A[3][0]($src)
110 xg @C[1],$A[3][1]($src)
111 xg @C[2],$A[3][2]($src)
112 xgr @C[3],@D[3]
113 xg @C[4],$A[3][4]($src)
115 lgr @T[0],@C[2]
116 rllg @C[2],@C[2],1
117 xgr @C[2],@C[0] # D[1] = ROL64(C[2], 1) ^ C[0]
119 rllg @C[0],@C[0],1
120 xgr @C[0],@C[3] # D[4] = ROL64(C[0], 1) ^ C[3]
122 rllg @C[3],@C[3],1
123 xgr @C[3],@C[1] # D[2] = ROL64(C[3], 1) ^ C[1]
125 rllg @C[1],@C[1],1
126 xgr @C[1],@C[4] # D[0] = ROL64(C[1], 1) ^ C[4]
128 rllg @C[4],@C[4],1
129 xgr @C[4],@T[0] # D[3] = ROL64(C[4], 1) ^ C[2]
131 (@D[0..4], @C) = (@C[1..4,0], @D);
133 xgr @C[1],@D[1]
134 xgr @C[2],@D[2]
135 xgr @C[3],@D[3]
136 rllg @C[1],@C[1],$rhotates[1][1]
137 xgr @C[4],@D[4]
138 rllg @C[2],@C[2],$rhotates[2][2]
139 xgr @C[0],@D[0]
141 lgr @T[0],@C[1]
142 ogr @C[1],@C[2]
143 rllg @C[3],@C[3],$rhotates[3][3]
144 xgr @C[1],@C[0] # C[0] ^ ( C[1] | C[2])
145 rllg @C[4],@C[4],$rhotates[4][4]
146 xg @C[1],0($iotas)
148 stg @C[1],$A[0][0]($dst) # R[0][0] = C[0] ^ ( C[1] | C[2]) ^ iotas[i]
150 lgr @T[1],@C[4]
151 ngr @C[4],@C[3]
152 lghi @C[1],-1 # no 'not' instruction :-(
153 xgr @C[4],@C[2] # C[2] ^ ( C[4] & C[3])
154 xgr @C[2],@C[1] # not @C[2]
155 stg @C[4],$A[0][2]($dst) # R[0][2] = C[2] ^ ( C[4] & C[3])
156 ogr @C[2],@C[3]
157 xgr @C[2],@T[0] # C[1] ^ (~C[2] | C[3])
159 ngr @T[0],@C[0]
160 stg @C[2],$A[0][1]($dst) # R[0][1] = C[1] ^ (~C[2] | C[3])
162 ogr @T[1],@C[0]
164 xgr @T[1],@C[3] # C[3] ^ ( C[4] | C[0])
168 lg @C[0],$A[0][3]($src)
169 lg @C[4],$A[4][2]($src)
170 lg @C[3],$A[3][1]($src)
171 lg @C[1],$A[1][4]($src)
172 lg @C[2],$A[2][0]($src)
174 xgr @C[0],@D[3]
175 xgr @C[4],@D[2]
176 rllg @C[0],@C[0],$rhotates[0][3]
177 xgr @C[3],@D[1]
178 rllg @C[4],@C[4],$rhotates[4][2]
179 xgr @C[1],@D[4]
180 rllg @C[3],@C[3],$rhotates[3][1]
181 xgr @C[2],@D[0]
183 lgr @T[0],@C[0]
184 ogr @C[0],@C[4]
185 rllg @C[1],@C[1],$rhotates[1][4]
186 xgr @C[0],@C[3] # C[3] ^ (C[0] | C[4])
187 rllg @C[2],@C[2],$rhotates[2][0]
188 stg @C[0],$A[1][3]($dst) # R[1][3] = C[3] ^ (C[0] | C[4])
190 lgr @T[1],@C[1]
191 ngr @C[1],@T[0]
192 lghi @C[0],-1 # no 'not' instruction :-(
193 xgr @C[1],@C[4] # C[4] ^ (C[1] & C[0])
194 xgr @C[4],@C[0] # not @C[4]
195 stg @C[1],$A[1][4]($dst) # R[1][4] = C[4] ^ (C[1] & C[0])
197 ogr @C[4],@C[3]
198 xgr @C[4],@C[2] # C[2] ^ (~C[4] | C[3])
200 ngr @C[3],@C[2]
201 stg @C[4],$A[1][2]($dst) # R[1][2] = C[2] ^ (~C[4] | C[3])
202 xgr @C[3],@T[1] # C[1] ^ (C[3] & C[2])
203 ogr @T[1],@C[2]
204 stg @C[3],$A[1][1]($dst) # R[1][1] = C[1] ^ (C[3] & C[2])
209 lg @C[2],$A[2][3]($src)
210 lg @C[3],$A[3][4]($src)
211 lg @C[1],$A[1][2]($src)
212 lg @C[4],$A[4][0]($src)
213 lg @C[0],$A[0][1]($src)
215 xgr @C[2],@D[3]
216 xgr @C[3],@D[4]
217 rllg @C[2],@C[2],$rhotates[2][3]
218 xgr @C[1],@D[2]
219 rllg @C[3],@C[3],$rhotates[3][4]
220 xgr @C[4],@D[0]
221 rllg @C[1],@C[1],$rhotates[1][2]
222 xgr @C[0],@D[1]
224 lgr @T[0],@C[2]
225 ngr @C[2],@C[3]
226 rllg @C[4],@C[4],$rhotates[4][0]
227 xgr @C[2],@C[1] # C[1] ^ ( C[2] & C[3])
229 stg @C[2],$A[2][1]($dst) # R[2][1] = C[1] ^ ( C[2] & C[3])
231 xgr @C[3],@T[1] # not @C[3]
232 lgr @T[1],@C[4]
233 ngr @C[4],@C[3]
234 rllg @C[0],@C[0],$rhotates[0][1]
235 xgr @C[4],@T[0] # C[2] ^ ( C[4] & ~C[3])
236 ogr @T[0],@C[1]
237 stg @C[4],$A[2][2]($dst) # R[2][2] = C[2] ^ ( C[4] & ~C[3])
238 xgr @T[0],@C[0] # C[0] ^ ( C[2] | C[1])
240 ngr @C[1],@C[0]
242 xgr @C[1],@T[1] # C[4] ^ ( C[1] & C[0])
243 ogr @C[0],@T[1]
244 stg @C[1],$A[2][4]($dst) # R[2][4] = C[4] ^ ( C[1] & C[0])
245 xgr @C[0],@C[3] # ~C[3] ^ ( C[0] | C[4])
246 stg @C[0],$A[2][3]($dst) # R[2][3] = ~C[3] ^ ( C[0] | C[4])
249 lg @C[2],$A[2][1]($src)
250 lg @C[3],$A[3][2]($src)
251 lg @C[1],$A[1][0]($src)
252 lg @C[4],$A[4][3]($src)
253 lg @C[0],$A[0][4]($src)
255 xgr @C[2],@D[1]
256 xgr @C[3],@D[2]
257 rllg @C[2],@C[2],$rhotates[2][1]
258 xgr @C[1],@D[0]
259 rllg @C[3],@C[3],$rhotates[3][2]
260 xgr @C[4],@D[3]
261 rllg @C[1],@C[1],$rhotates[1][0]
262 xgr @C[0],@D[4]
263 rllg @C[4],@C[4],$rhotates[4][3]
265 lgr @T[0],@C[2]
266 ogr @C[2],@C[3]
268 xgr @C[2],@C[1] # C[1] ^ ( C[2] | C[3])
269 xgr @C[3],@T[1] # not @C[3]
270 stg @C[2],$A[3][1]($dst) # R[3][1] = C[1] ^ ( C[2] | C[3])
272 lgr @T[1],@C[4]
273 ogr @C[4],@C[3]
274 rllg @C[0],@C[0],$rhotates[0][4]
275 xgr @C[4],@T[0] # C[2] ^ ( C[4] | ~C[3])
276 ngr @T[0],@C[1]
277 stg @C[4],$A[3][2]($dst) # R[3][2] = C[2] ^ ( C[4] | ~C[3])
278 xgr @T[0],@C[0] # C[0] ^ ( C[2] & C[1])
280 ogr @C[1],@C[0]
282 xgr @C[1],@T[1] # C[4] ^ ( C[1] | C[0])
283 ngr @C[0],@T[1]
284 stg @C[1],$A[3][4]($dst) # R[3][4] = C[4] ^ ( C[1] | C[0])
285 xgr @C[0],@C[3] # ~C[3] ^ ( C[0] & C[4])
286 stg @C[0],$A[3][3]($dst) # R[3][3] = ~C[3] ^ ( C[0] & C[4])
302 @C = @D[2..4,0,1];
304 lgr @T[0],@C[0]
305 ngr @C[0],@C[1]
307 xgr @C[0],@C[4] # C[4] ^ ( C[0] & C[1])
308 xgr @C[1],@T[1] # not @C[1]
309 stg @C[0],$A[4][4]($src) # R[4][4] = C[4] ^ ( C[0] & C[1])
311 lgr @T[1],@C[2]
312 ngr @C[2],@C[1]
314 xgr @C[2],@T[0] # C[0] ^ ( C[2] & ~C[1])
315 ogr @T[0],@C[4]
316 stg @C[2],$A[4][0]($src) # R[4][0] = C[0] ^ ( C[2] & ~C[1])
317 xgr @T[0],@C[3] # C[3] ^ ( C[0] | C[4])
319 ngr @C[4],@C[3]
321 xgr @C[4],@T[1] # C[2] ^ ( C[4] & C[3])
322 ogr @C[3],@T[1]
323 stg @C[4],$A[4][2]($src) # R[4][2] = C[2] ^ ( C[4] & C[3])
324 xgr @C[3],@C[1] # ~C[1] ^ ( C[2] | C[3])
326 lgr @C[1],@C[0] # harmonize with the loop top
327 lgr @C[0],@T[0]
328 stg @C[3],$A[4][1]($src) # R[4][1] = ~C[1] ^ ( C[2] | C[3])
