.globl asr_l / / long asr_l(l, n); / long l; long n; / Performs l>>n for long-long. / asr_l: mov 2(sp),r0 mov 4(sp),r1 0: sub $1,10(sp) sbc 6(sp) bmi 0f asr r0 ror r1 br 0b 0: return