overby.me / darling-nix
this repo has no description
fork atom
darling-nix / src / libm / Source / Intel / s_sin.S
at fixPythonPipStalling 29 lines 473 B view raw
Lubos Dolezel Restructured source tree to prepare for merge with the "darling" repo
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 11PRIVATE_ENTRY(__sinl) //not public. Currently used by single and double precision entry points 12ENTRY(sinl) 13 fldt FIRST_ARG_OFFSET(STACKP) 14 fsin 15 fnstsw %ax 16 andw $0x400,%ax 17 jnz 1f 18 ret 19 201: fldpi 21 fadd %st(0) 22 fxch %st(1) 232: fprem1 24 fnstsw %ax 25 andw $0x400,%ax 26 jnz 2b 27 fstp %st(1) 28 fsin 29 ret