1 %verify "branch taken" 2 %verify "branch not taken" 3 /* 4 * Generic two-operand compare-and-branch operation. Provide a "revcmp" 5 * fragment that specifies the *reverse* comparison to perform, e.g. 6 * for "if-le" you would use "gt". 7 * 8 * For: if-eq, if-ne, if-lt, if-ge, if-gt, if-le 9 */ 10 /* if-cmp vA, vB, +CCCC */ 11 mov r0, rINST, lsr #8 @ r0<- A+ 12 mov r1, rINST, lsr #12 @ r1<- B 13 and r0, r0, #15 14 GET_VREG(r3, r1) @ r3<- vB 15 GET_VREG(r2, r0) @ r2<- vA 16 mov r9, #4 @ r0<- BYTE branch dist for not-taken 17 cmp r2, r3 @ compare (vA, vB) 18 b${revcmp} 1f @ branch to 1 if comparison failed 19 FETCH_S(r9, 1) @ r9<- branch offset, in code units 20 movs r9, r9, asl #1 @ convert to bytes, check sign 21 bmi common_backwardBranch @ yes, do periodic checks 22 1: 23 #if defined(WITH_JIT) 24 GET_JIT_PROF_TABLE(r0) 25 FETCH_ADVANCE_INST_RB(r9) @ update rPC, load rINST 26 b common_testUpdateProfile 27 #else 28 FETCH_ADVANCE_INST_RB(r9) @ update rPC, load rINST 29 GET_INST_OPCODE(ip) @ extract opcode from rINST 30 GOTO_OPCODE(ip) @ jump to next instruction 31 #endif 32 33
