src/libm/Source/Intel/e_remainder.S at fixPythonPipStalling

overby.me / darling-nix

fork atom

this repo has no description

fork atom

darling-nix / src / libm / Source / Intel / e_remainder.S

at fixPythonPipStalling 19 lines 320 B view raw

wrap content

Lubos Dolezel Restructured source tree to prepare for merge with the "darling" repo 10y ago

f228ae16

 1/*
 2 * Adapted from original written by J.T. Conklin <jtc@netbsd.org>.
 3 * Public domain.
 4 *
 5 *	by Ian Ollmann, Apple Computer 2006
 6 */
 7
 8#include <machine/asm.h>
 9#include "abi.h"
10
11ENTRY(remainderl)
12	fldt	SECOND_ARG_OFFSET(STACKP)
13	fldt	FIRST_ARG_OFFSET(STACKP)
141:	fprem1
15	fstsw	%ax
16	btw		$10,%ax
17	jc		1b
18	fstp	%st(1)
19	ret