fctiw.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:0k
源码类别:

Linux/Unix编程

开发平台:

Unix_Linux

  1. /*
  2.  * BK Id: SCCS/s.fctiw.c 1.6 05/17/01 18:14:22 cort
  3.  */
  4. #include <linux/types.h>
  5. #include <linux/errno.h>
  6. #include <asm/uaccess.h>
  7. #include "soft-fp.h"
  8. #include "double.h"
  9. int
  10. fctiw(u32 *frD, void *frB)
  11. {
  12. FP_DECL_D(B);
  13. unsigned int r;
  14. __FP_UNPACK_D(B, frB);
  15. FP_TO_INT_D(r, B, 32, 1);
  16. frD[1] = r;
  17. #ifdef DEBUG
  18. printk("%s: D %p, B %p: ", __FUNCTION__, frD, frB);
  19. dump_double(frD);
  20. printk("n");
  21. #endif
  22. return 0;
  23. }