home *** CD-ROM | disk | FTP | other *** search
/ GEMini Atari / GEMini_Atari_CD-ROM_Walnut_Creek_December_1993.iso / files / gnu / libsrc87 / sldexp.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-07-30  |  788 b   |  42 lines
  1. #ifdef __RCS_ID__
  2. static char rcsid[] = "$Header: /source/atari/gnu/lib/RCS/sldexp.c,v 1.2 89/03/25 02:43:02 bammi Exp $";
  3. #endif /* __RCS_ID__ */
  4.  
  5. /*
  6.  *
  7.  * $Log:    sldexp.c,v $
  8.  * Revision 1.2  89/03/25  02:43:02  bammi
  9.  * applied ers diff (03/24/89) and other cleanups
  10.  * 
  11.  * Revision 1.1  89/03/21  16:52:20  bammi
  12.  * ansi-ization in progress. state of the file as of (03/21/89 03:30:00)
  13.  * 
  14.  * 
  15.  */
  16.  
  17. #ifdef __MSHORT__
  18.  
  19. /*
  20.  * double ldexp(double value, int exp)
  21.  *
  22.  * just a dummy routine that call the real ldexp with a long second
  23.  * parameter.
  24.  *
  25.  * ++jrb    bammi@dsrgsun.ces.CWRU.edu
  26.  *
  27.  */
  28. #ifdef __STDC__
  29. double __ldexp(double, long);
  30. #else
  31. extern double __ldexp();
  32. #endif
  33.  
  34. double ldexp(value, ex)
  35. double value;
  36. int ex;
  37. {
  38.     return __ldexp(value, (long)ex);
  39. }
  40.  
  41. #endif /* __MSHORT__ */
  42.