1	.code
2	.align 4
3s:
4	.PROC
5	.CALLINFO FRAME=128,CALLS,SAVE_RP
6	.ENTRY
7	stw %r2,-20(%r30)
8	copy %r4,%r1
9	copy %r30,%r4
10	stwm %r1,128(%r30)
11	stw %r30,12(%r4)
12	ldil L'L$0007,%r19
13	ldo R'L$0007(%r19),%r19
14	comib,>= 0,%r26,L$0002
15	stw %r19,8(%r4)
16L$0003:
17L$0002:
18	b L$0001
19	ldo 1(%r0),%r28
20L$0007:
21	ldil L'L$0002,%r19
22	ldo R'L$0002(%r19),%r19
23	comb,= %r29,%r19,L$0002
24	ldo -8(%r4),%r4
25	.EXIT
26	.PROCEND
27