xref: /original-bsd/usr.bin/f77/libU77/test/sigfpe.s (revision e59fb703)
1/*-
2 * Copyright (c) 1980 The Regents of the University of California.
3 * All rights reserved.
4 *
5 * %sccs.include.proprietary.c%
6 */
7
8#ifndef lint
9	.asciz "@(#)sigfpe.s	5.2 (Berkeley) 04/12/91"
10#endif /* not lint */
11
12	.data
13	.even
14L16:
15	0.;8.
16	.even
17L17:
18	-1.;-1.
19	.data
20	.bss
21~~sigfpe_ = _sigfpe_
22~~:
23	.data
24	.globl	_sigfpe_
25	.globl	_signal_
26	.even
27.text
28jbr	L11
29L14:mov	$L17,(sp)
30mov	r5,-(sp)
31mov	$L16,-(sp)
32jsr	pc,*$_signal_
33cmp	(sp)+,(sp)+
34jbr	L13
35L13:L12:jmp	cret
36L11:_sigfpe_:
37~~sigfpe_:
38jsr	r5,csv
39mov	r5,r4
40add	$4,r4
41jbr	L14
42.globl
43.data
44