home *** CD-ROM | disk | FTP | other *** search
/ Complete Linux / Complete Linux.iso / docs / devel / lisp / akcl_1_6.z / akcl_1_6 / mp / gnulib1.c < prev    next >
Encoding:
Text File  |  1991-06-28  |  243 b   |  31 lines
  1.  
  2. double
  3. __adddf3 (a, b)
  4.      double a, b;
  5. {
  6.   return a + b;
  7. }
  8.  
  9. double
  10. __floatsidf (a)
  11.      int a;
  12. {
  13.   return (double) a;
  14. }
  15.  
  16. int
  17. __fixdfsi (a)
  18.      double a;
  19. {
  20.   return (int) a;
  21. }
  22.  
  23. double
  24. __muldf3 (a, b)
  25.      double a, b;
  26. {
  27.   return a * b;
  28. }
  29.  
  30.  
  31.