1a4ca7ca8SDavid Schultz/* 2a4ca7ca8SDavid Schultz * Based on code written by J.T. Conklin <jtc@NetBSD.org>. 3a4ca7ca8SDavid Schultz * Public domain. 4a4ca7ca8SDavid Schultz */ 5a4ca7ca8SDavid Schultz 6a4ca7ca8SDavid Schultz#include <machine/asm.h> 7a4ca7ca8SDavid SchultzENTRY(truncf) 8a4ca7ca8SDavid Schultz pushl %ebp 9a4ca7ca8SDavid Schultz movl %esp,%ebp 10a4ca7ca8SDavid Schultz subl $8,%esp 11a4ca7ca8SDavid Schultz 127f8fa2cfSDaniel Eischen fstcw -4(%ebp) /* store fpu control word */ 137f8fa2cfSDaniel Eischen movw -4(%ebp),%dx 14a4ca7ca8SDavid Schultz orw $0x0c00,%dx /* round towards -oo */ 157f8fa2cfSDaniel Eischen movw %dx,-8(%ebp) 16a52f4499SGordon Bergling fldcw -8(%ebp) /* load modified control word */ 17a4ca7ca8SDavid Schultz 18a4ca7ca8SDavid Schultz flds 8(%ebp) /* round */ 19a4ca7ca8SDavid Schultz frndint 20a4ca7ca8SDavid Schultz 217f8fa2cfSDaniel Eischen fldcw -4(%ebp) /* restore original control word */ 22a4ca7ca8SDavid Schultz 23a4ca7ca8SDavid Schultz leave 24a4ca7ca8SDavid Schultz ret 259235ed71SAttilio RaoEND(truncf) 268997563cSKonstantin Belousov 278997563cSKonstantin Belousov .section .note.GNU-stack,"",%progbits 28