Lines Matching refs:extru
61 * definition of extru macro. If pos and len are constants, the compiler
62 * will generate an extru instruction when optimized
64 #define extru(r,pos,len) (((r) >> (31-(pos))) & (( 1 << (len)) - 1))
115 #define get_major(op) extru(op,fpmajorpos,6)
120 #define get_class(op) extru(op,fpclasspos,2)
125 #define get_subop(op) extru(op,fpsubpos,3)
130 #define get_subop1_PA1_1(op) extru(op,fpclass1subpos,2) /* PA89 (1.1) fmt */
131 #define get_subop1_PA2_0(op) extru(op,fpclass1subpos,3) /* PA 2.0 fmt */
302 r1 = extru(ir,fpr1pos,5) * sizeof(double)/sizeof(u_int);
305 t = extru(ir,fptpos,5) * sizeof(double)/sizeof(u_int);
308 fmt = extru(ir,fpfmtpos,2); /* get fmt completer */
406 df = extru(ir,fpdfpos,2); /* get dest format */
530 r2 = extru(ir, fpr2pos, 5) * sizeof(double)/sizeof(u_int);
535 if (extru(ir, fpnulpos, 1)) { /* FTEST */
546 * return(ftest(0L,extru(ir,fptpos,5),
558 &fpregs[r2],extru(ir,fptpos,5),
565 &fpregs[r2],extru(ir,fptpos,5),
589 &fpregs[r2],extru(ir,fptpos,5),
596 &fpregs[r2],extru(ir,fptpos,5),
616 * return(ftest(0L,extru(ir,fptpos,5),
627 r2 = extru(ir,fpr2pos,5) * sizeof(double)/sizeof(u_int);
717 r1 = ((extru(ir,fpr1pos,5)<<1)|(extru(ir,fpxr1pos,1)));
720 t = ((extru(ir,fptpos,5)<<1)|(extru(ir,fpxtpos,1)));
724 fmt = extru(ir,fpfmtpos,2);
726 fmt = extru(ir,fp0efmtpos,1);
815 df = extru(ir,fpdfpos,2); /* get dest format */
944 r2 = (extru(ir,fpr2pos,5)<<1);
946 r2 = ((extru(ir,fpr2pos,5)<<1)|(extru(ir,fpxr2pos,1)));
952 if (extru(ir, fpnulpos, 1)) { /* FTEST */
962 &fpregs[r2],extru(ir,fptpos,5),
969 &fpregs[r2],extru(ir,fptpos,5),
994 &fpregs[r2],extru(ir,fptpos,5),
1001 &fpregs[r2],extru(ir,fptpos,5),
1019 r2 = (extru(ir,fpr2pos,5)<<1);
1021 r2 = ((extru(ir,fpr2pos,5)<<1)|(extru(ir,fpxr2pos,1)));
1054 if (extru(ir,fpxpos,1)) {
1134 fmt = extru(ir, fpmultifmt, 1); /* get sgl/dbl flag */
1136 rm1 = extru(ir, fprm1pos, 5) * sizeof(double)/sizeof(u_int);
1139 rm2 = extru(ir, fprm2pos, 5) * sizeof(double)/sizeof(u_int);
1142 tm = extru(ir, fptmpos, 5) * sizeof(double)/sizeof(u_int);
1145 ra = extru(ir, fprapos, 5) * sizeof(double)/sizeof(u_int);
1146 ta = extru(ir, fptapos, 5) * sizeof(double)/sizeof(u_int);
1204 rm1 = (extru(ir,fprm1pos,4) | 0x10 ) << 1; /* get offset */
1205 rm1 |= extru(ir,fprm1pos-4,1); /* add right word offset */
1207 rm2 = (extru(ir,fprm2pos,4) | 0x10 ) << 1; /* get offset */
1208 rm2 |= extru(ir,fprm2pos-4,1); /* add right word offset */
1210 tm = (extru(ir,fptmpos,4) | 0x10 ) << 1; /* get offset */
1211 tm |= extru(ir,fptmpos-4,1); /* add right word offset */
1213 ra = (extru(ir,fprapos,4) | 0x10 ) << 1; /* get offset */
1214 ra |= extru(ir,fprapos-4,1); /* add right word offset */
1216 ta = (extru(ir,fptapos,4) | 0x10 ) << 1; /* get offset */
1217 ta |= extru(ir,fptapos-4,1); /* add right word offset */
1272 fmt = extru(ir, fpmultifmt, 1); /* get sgl/dbl flag */
1274 rm1 = extru(ir, fprm1pos, 5) * sizeof(double)/sizeof(u_int);
1277 rm2 = extru(ir, fprm2pos, 5) * sizeof(double)/sizeof(u_int);
1280 tm = extru(ir, fptmpos, 5) * sizeof(double)/sizeof(u_int);
1283 ra = extru(ir, fprapos, 5) * sizeof(double)/sizeof(u_int);
1286 ta = extru(ir, fptapos, 5) * sizeof(double)/sizeof(u_int);
1311 rm1 = (extru(ir,fprm1pos,4) | 0x10 ) << 1; /* get offset */
1312 rm1 |= extru(ir,fprm1pos-4,1); /* add right word offset */
1314 rm2 = (extru(ir,fprm2pos,4) | 0x10 ) << 1; /* get offset */
1315 rm2 |= extru(ir,fprm2pos-4,1); /* add right word offset */
1317 tm = (extru(ir,fptmpos,4) | 0x10 ) << 1; /* get offset */
1318 tm |= extru(ir,fptmpos-4,1); /* add right word offset */
1320 ra = (extru(ir,fprapos,4) | 0x10 ) << 1; /* get offset */
1321 ra |= extru(ir,fprapos-4,1); /* add right word offset */
1323 ta = (extru(ir,fptapos,4) | 0x10 ) << 1; /* get offset */
1324 ta |= extru(ir,fptapos-4,1); /* add right word offset */
1354 fmt = extru(ir,fpfmtpos,1); /* get fmt completer */
1356 rm1 = extru(ir,fprm1pos,5) * sizeof(double)/sizeof(u_int);
1359 rm2 = extru(ir,fprm2pos,5) * sizeof(double)/sizeof(u_int);
1362 ra = ((extru(ir,fpraupos,3)<<2)|(extru(ir,fpralpos,3)>>1)) *
1366 t = extru(ir,fptpos,5) * sizeof(double)/sizeof(u_int);
1370 if (extru(ir,fpfusedsubop,1)) { /* fmpyfadd or fmpynfadd? */
1379 rm1 = (extru(ir,fprm1pos,5)<<1)|(extru(ir,fpxrm1pos,1));
1382 rm2 = (extru(ir,fprm2pos,5)<<1)|(extru(ir,fpxrm2pos,1));
1385 ra = (extru(ir,fpraupos,3)<<3)|extru(ir,fpralpos,3);
1388 t = ((extru(ir,fptpos,5)<<1)|(extru(ir,fpxtpos,1)));
1392 if (extru(ir,fpfusedsubop,1)) { /* fmpyfadd or fmpynfadd? */