1 %verify "executed" 2 /* 3 * 64-bit floating point vfp sqrt operation. 4 * If the result is a NaN, bail out to library code to do 5 * the right thing. 6 * 7 * On entry: 8 * r2 src addr of op1 9 * On exit: 10 * r0,r1 = res 11 */ 12 fldd d0, [r2] 13 fsqrtd d1, d0 14 fcmpd d1, d1 15 fmstat 16 fmrrd r0, r1, d1 17 bxeq lr @ Result OK - return 18 ldr r2, .Lsqrt 19 fmrrd r0, r1, d0 @ reload orig operand 20 bx r2 @ tail call to sqrt library routine 21 22 .Lsqrt: 23 .word sqrt 24
