Home | History | Annotate | Line # | Download | only in gen
fpsetround.c revision 1.2 
      1 /*	$NetBSD: fpsetround.c,v 1.2 1996/09/16 18:10:51 jonathan Exp $	*/
      2 
      3 /*
      4  * Written by J.T. Conklin, Apr 11, 1995
      5  * Public domain.
      6  */
      7 
      8 #include <ieeefp.h>
      9 
     10 fp_rnd
     11 fpsetround(rnd_dir)
     12 	fp_rnd rnd_dir;
     13 {
     14 	fp_rnd old;
     15 	fp_rnd new;
     16 
     17 	__asm__("cfc1 %0,$31" : "=r" (old));
     18 
     19 	new = old;
     20 	new &= ~0x03;
     21 	new |= (rnd_dir & 0x03);
     22 
     23 	__asm__("ctc1 %0,$31" : : "r" (new));
     24 
     25 	return old & 0x03;
     26 }
     27