1 1.2 uebayasi /* $NetBSD: fpgetprec.S,v 1.2 2014/05/23 02:34:19 uebayasi Exp $ */ 2 1.1 christos 3 1.1 christos /* 4 1.1 christos * Written by J.T. Conklin, Apr 4, 1995 5 1.1 christos * Public domain. 6 1.1 christos */ 7 1.1 christos 8 1.1 christos #include <machine/asm.h> 9 1.1 christos 10 1.1 christos #ifdef WEAK_ALIAS 11 1.1 christos WEAK_ALIAS(fpgetprec, _fpgetprec) 12 1.1 christos ENTRY(_fpgetprec) 13 1.1 christos #else 14 1.1 christos ENTRY(fpgetprec) 15 1.1 christos #endif 16 1.1 christos subl $4,%esp 17 1.1 christos fnstcw (%esp) 18 1.1 christos movl (%esp),%eax 19 1.1 christos rorl $8,%eax 20 1.1 christos andl $3,%eax 21 1.1 christos addl $4,%esp 22 1.1 christos ret 23 1.2 uebayasi #ifdef WEAK_ALIAS 24 1.2 uebayasi END(_fpgetprec) 25 1.2 uebayasi #else 26 1.2 uebayasi END(fpgetprec) 27 1.2 uebayasi #endif 28