File ffcall/callback/vacall_r/vacall-hppa.s from the latest check-in


	.code
	.IMPORT $global$,DATA
	.IMPORT $$dyncall,MILLICODE
; gcc_compiled.:
	.code

	.align 4
	.EXPORT __vacall_r,ENTRY,PRIV_LEV=3,ARGW0=GR,ARGW1=GR,ARGW2=GR,ARGW3=GR
	.label __vacall_r
	.PROC
	.CALLINFO FRAME=192,CALLS,SAVE_RP
	.ENTRY
	stw %r2,-20(0,%r30)
	ldo 192(%r30),%r30
	stw %r26,-228(0,%r30)
	stw %r25,-232(0,%r30)
	stw %r24,-236(0,%r30)
	ldo -120(%r30),%r19
	fstds %fr5,8(0,%r19)
	fstds %fr7,0(0,%r19)
	fstws %fr4L,-4(0,%r19)
	fstws %fr5L,-8(0,%r19)
	fstws %fr6L,-12(0,%r19)
	fstws %fr7L,-16(0,%r19)
	stw %r23,-240(0,%r30)
	stw 0,-184(0,%r30)
	ldo -224(%r30),%r19
	stw %r19,-180(0,%r30)
	stw 0,-176(0,%r30)
	stw 0,-172(0,%r30)
	stw %r28,-152(0,%r30)
	ldo -240(%r30),%r19
	stw %r19,-148(0,%r30)
	ldi 104,%r19
	stw %r19,-144(0,%r30)
	ldi 120,%r19
	stw %r19,-140(0,%r30)
	ldw 4(0,%r29),%r26
	ldw 0(0,%r29),%r19
	ldo -184(%r30),%r25
	copy %r19,%r22
	.CALL	ARGW0=GR
	bl $$dyncall,%r31
	copy %r31,%r2
	ldw -172(0,%r30),%r19
	comib,= 0,%r19,L$0065
	ldw -212(0,%r30),%r2
	comiclr,= 1,%r19,0
	comib,<>,n 2,%r19,L$0006
	.label L$0057
	ldb -160(0,%r30),%r19
	bl L$0065,0
	extrs %r19,31,8,%r28
	.label L$0006
	comib,<>,n 3,%r19,L$0008
	ldb -160(0,%r30),%r28
	bl L$0065,0
	ldw -212(0,%r30),%r2
	.label L$0008
	comib,<>,n 4,%r19,L$0010
	ldh -160(0,%r30),%r19
	bl L$0003,0
	extrs %r19,31,16,%r28
	.label L$0010
	comib,<>,n 5,%r19,L$0012
	ldh -160(0,%r30),%r28
	bl L$0065,0
	ldw -212(0,%r30),%r2
	.label L$0012
	comib,=,n 6,%r19,L$0060
	comib,=,n 7,%r19,L$0060
	comib,=,n 8,%r19,L$0060
	comib,= 9,%r19,L$0060
	ldo -10(%r19),%r19
	comib,>>= 1,%r19,L$0059
	ldw -172(0,%r30),%r19
	comib,<>,n 12,%r19,L$0024
	ldo -152(%r30),%r19
	fldws -8(0,%r19),%fr4L
	.label L$0060
	bl L$0003,0
	ldw -160(0,%r30),%r28
	.label L$0024
	comib,<>,n 13,%r19,L$0026
	ldo -152(%r30),%r19
	fldds -8(0,%r19),%fr4
	.label L$0059
	ldw -160(0,%r30),%r28
	bl L$0003,0
	ldw -156(0,%r30),%r29
	.label L$0026
	comiclr,<> 14,%r19,0
	bl,n L$0060,0
	comib,<> 15,%r19,L$0065
	ldw -212(0,%r30),%r2
	ldw -184(0,%r30),%r19
	bb,>=,n %r19,31,L$0031
	ldw -176(0,%r30),%r28
	bl,n L$0003,0
	.label L$0031
	bb,>= %r19,30,L$0065
	ldw -212(0,%r30),%r2
	bb,>= %r19,28,L$0034
	ldw -168(0,%r30),%r19
	comib,=,n 1,%r19,L$0061
	comib,<>,n 2,%r19,L$0037
	ldw -176(0,%r30),%r19
	bl L$0065,0
	ldh 0(0,%r19),%r28
	.label L$0037
	comib,<> 4,%r19,L$0065
	ldw -212(0,%r30),%r2
	ldw -176(0,%r30),%r19
	bl L$0065,0
	ldw 0(0,%r19),%r28
	.label L$0034
	comib,= 0,%r19,L$0065
	ldw -212(0,%r30),%r2
	comib,<<,n 8,%r19,L$0065
	comib,<>,n 1,%r19,L$0042
	.label L$0061
	ldw -176(0,%r30),%r19
	bl L$0003,0
	ldb 0(0,%r19),%r28
	.label L$0042
	comib,<>,n 2,%r19,L$0044
	ldw -176(0,%r30),%r19
	ldb 0(0,%r19),%r20
	ldb 1(0,%r19),%r19
	zdep %r20,23,24,%r20
	bl L$0003,0
	or %r20,%r19,%r28
	.label L$0044
	comib,<> 3,%r19,L$0046
	ldw -176(0,%r30),%r21
	ldb 0(0,%r21),%r19
	ldb 1(0,%r21),%r20
	ldb 2(0,%r21),%r21
	zdep %r19,15,16,%r19
	zdep %r20,23,24,%r20
	or %r19,%r20,%r19
	bl L$0003,0
	or %r19,%r21,%r28
	.label L$0046
	comib,= 4,%r19,L$0062
	ldw -176(0,%r30),%r22
	comib,<>,n 5,%r19,L$0050
	ldb 4(0,%r22),%r29
	.label L$0062
	ldb 0(0,%r22),%r19
	ldb 1(0,%r22),%r20
	ldb 2(0,%r22),%r21
	zdep %r19,7,8,%r19
	zdep %r20,15,16,%r20
	or %r19,%r20,%r19
	zdep %r21,23,24,%r21
	ldb 3(0,%r22),%r20
	or %r19,%r21,%r19
	bl L$0003,0
	or %r19,%r20,%r28
	.label L$0050
	comib,<> 6,%r19,L$0052
	ldw -176(0,%r30),%r22
	ldb 0(0,%r22),%r19
	ldb 1(0,%r22),%r20
	ldb 2(0,%r22),%r21
	zdep %r19,7,8,%r19
	zdep %r20,15,16,%r20
	or %r19,%r20,%r19
	zdep %r21,23,24,%r21
	ldb 3(0,%r22),%r20
	or %r19,%r21,%r19
	or %r19,%r20,%r28
	ldb 4(0,%r22),%r19
	ldb 5(0,%r22),%r20
	bl L$0063,0
	zdep %r19,23,24,%r19
	.label L$0052
	comib,<>,n 7,%r19,L$0054
	ldb 0(0,%r22),%r19
	ldb 1(0,%r22),%r20
	ldb 2(0,%r22),%r21
	zdep %r19,7,8,%r19
	zdep %r20,15,16,%r20
	or %r19,%r20,%r19
	zdep %r21,23,24,%r21
	or %r19,%r21,%r19
	ldb 3(0,%r22),%r20
	ldb 6(0,%r22),%r21
	or %r19,%r20,%r28
	ldb 4(0,%r22),%r19
	ldb 5(0,%r22),%r20
	zdep %r19,15,16,%r19
	zdep %r20,23,24,%r20
	or %r19,%r20,%r19
	bl L$0003,0
	or %r19,%r21,%r29
	.label L$0054
	comib,<> 8,%r19,L$0065
	ldw -212(0,%r30),%r2
	ldw -176(0,%r30),%r22
	ldb 0(0,%r22),%r19
	ldb 1(0,%r22),%r20
	ldb 2(0,%r22),%r21
	zdep %r19,7,8,%r19
	zdep %r20,15,16,%r20
	or %r19,%r20,%r19
	zdep %r21,23,24,%r21
	or %r19,%r21,%r19
	ldb 3(0,%r22),%r20
	ldb 6(0,%r22),%r21
	or %r19,%r20,%r28
	zdep %r21,23,24,%r21
	ldb 4(0,%r22),%r19
	ldb 5(0,%r22),%r20
	zdep %r19,7,8,%r19
	zdep %r20,15,16,%r20
	or %r19,%r20,%r19
	ldb 7(0,%r22),%r20
	or %r19,%r21,%r19
	.label L$0063
	or %r19,%r20,%r29
	.label L$0003
	ldw -212(0,%r30),%r2
	.label L$0065
	bv 0(%r2)
	ldo -192(%r30),%r30
	.EXIT
	.PROCEND