.code .align 4 s: .PROC .CALLINFO FRAME=128,CALLS,SAVE_RP .ENTRY stw %r2,-20(%r30) copy %r4,%r1 copy %r30,%r4 stwm %r1,128(%r30) stw %r30,12(%r4) ldil L'L$0007,%r19 ldo R'L$0007(%r19),%r19 comib,>= 0,%r26,L$0002 stw %r19,8(%r4) L$0003: L$0002: b L$0001 ldo 1(%r0),%r28 L$0007: ldil L'L$0002,%r19 ldo R'L$0002(%r19),%r19 comb,= %r29,%r19,L$0002 ldo -8(%r4),%r4 .EXIT .PROCEND