e_remainder.S (3a8617a83f16ffc9db4f96e1f0f21af94078e6b1) e_remainder.S (ec8cc6082c0ef5ab7ee0b3d1f06293d50693c7c3)
1/*
2 * Copyright (c) 1993,94 Winning Strategies, Inc.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright

--- 19 unchanged lines hidden (view full) ---

28 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 */
30
31/*
32 * Written by:
33 * J.T. Conklin (jtc@wimsey.com), Winning Strategies, Inc.
34 */
35
1/*
2 * Copyright (c) 1993,94 Winning Strategies, Inc.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright

--- 19 unchanged lines hidden (view full) ---

28 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 */
30
31/*
32 * Written by:
33 * J.T. Conklin (jtc@wimsey.com), Winning Strategies, Inc.
34 */
35
36#include <machine/asm.h>
36#include <machine/asmacros.h>
37
37
38RCSID("$Id: e_remainder.S,v 1.2 1994/03/12 01:30:31 jtc Exp $")
38RCSID("$Id: e_remainder.S,v 1.1.1.1 1994/08/19 09:40:01 jkh Exp $")
39
40ENTRY(__ieee754_remainder)
41 fldl 12(%esp)
42 fldl 4(%esp)
431: fprem1
44 fstsw %ax
45 sahf
46 jp 1b
47 fstpl %st(1)
48 ret
39
40ENTRY(__ieee754_remainder)
41 fldl 12(%esp)
42 fldl 4(%esp)
431: fprem1
44 fstsw %ax
45 sahf
46 jp 1b
47 fstpl %st(1)
48 ret