1/* For Solaris (e.g., SunOS 5.8 i386) on an x86 (with x87), with */ 2/* compilation by gcc. Returns the previous x87 control word. */ 3 .file "fpsetprec.s" 4 .version "01.01" 5.text 6 .align 4 7.globl fpsetprec 8 .type fpsetprec,@function 9fpsetprec: 10 pushl %ebp 11 movl %esp,%ebp 12 addl $-4,%esp /* so -2(%ebp) is above %esp */ 13 fstcw -2(%ebp) 14 xor %eax,%eax 15 movw -2(%ebp),%ax 16 movw -2(%ebp),%dx 17 andw $-769,%dx 18 orw 8(%ebp),%dx 19 movw %dx,-2(%ebp) 20 fldcw -2(%ebp) 21 jmp .L2 22 .align 4 23.L2: 24 leave 25 ret 26.Lfe1: 27 .size fpsetprec,.Lfe1-fpsetprec 28