1/* $OpenBSD: s_cos.S,v 1.3 2016/09/12 19:47:02 guenther Exp $ */ 2/* 3 * Written by J.T. Conklin <jtc@netbsd.org>. 4 * Public domain. 5 */ 6 7#include "DEFS.h" 8 9ENTRY(cos) 10 fldl 4(%esp) 11 fcos 12 fnstsw %ax 13 andw $0x400,%ax 14 jnz 1f 15 ret 161: fldpi 17 fadd %st(0) 18 fxch %st(1) 192: fprem1 20 fnstsw %ax 21 andw $0x400,%ax 22 jnz 2b 23 fstp %st(1) 24 fcos 25 ret 26END_STD(cos) 27