xref: /csrg-svn/usr.bin/pascal/px/x (revision 33022)
1*33022Sbostics,"@(#)x	5.1 (Berkeley) 12/12/87",&,
2*33022Sbostics/callf.\$4,_setup/.data\
3*33022Sbostic	.align 2\
4*33022Sbostic	.comm Ll1,8\
5*33022Sbostic	.text/
6*33022Sbostics/callf.\$8,_push2/shal	$16,(sp),(sp)/
7*33022Sbostic/callf.\$8,_push4/d
8*33022Sbostic/callf.\$12,_push8/d
9*33022Sbostic/callf.\$12,_pushsze8/d
10*33022Sbostics/callf.\$8,_pushsp/movab	4(sp),r0\
11*33022Sbostic	subl2	(sp)+,r0\
12*33022Sbostic	movl	r0,sp/
13*33022Sbostics/callf.\$4,_pop2/shar	$16,(sp)+,r0/
14*33022Sbostics/callf.\$4,_pop4/movl	(sp)+,r0/
15*33022Sbostics/callf.\$4,_pop8/movl	(sp)+,r0\
16*33022Sbostic	movl	(sp)+,r1/
17*33022Sbostics/callf.\$4,_popsze8/movl	(sp)+,Ll1\
18*33022Sbostic	movl	(sp)+,Ll1+4\
19*33022Sbostic	moval	Ll1,r0/
20*33022Sbostics/callf.\$8,_popsp/movab	4(sp),r0\
21*33022Sbostic	addl3	(sp)+,r0,sp/
22*33022Sbostics/callf.\$4,_enableovrflo/bicpsw	$0x20/
23*33022Sbostics/callf.\$4,_disableovrflo/bicpsw	$0x20/
24*33022Sbostics/*-56(fp)/(r12)/
25*33022Sbostics/-56(fp)/r12/
26