m3.c 1.3 KB

123456789101112131415161718192021222324252627282930313233
  1. /***********************************************************************
  2. * *
  3. * This software is part of the ast package *
  4. * Copyright (c) 1994-2011 AT&T Intellectual Property *
  5. * Copyright (c) 2020-2022 Contributors to ksh 93u+m *
  6. * and is licensed under the *
  7. * Eclipse Public License, Version 2.0 *
  8. * *
  9. * A copy of the License is available at *
  10. * https://www.eclipse.org/org/documents/epl-2.0/EPL-2.0.html *
  11. * (with md5 checksum 84283fa8859daf213bdda5a9f8d1be1d) *
  12. * *
  13. * Glenn Fowler <gsf@research.att.com> *
  14. * Martijn Dekker <martijn@inlv.org> *
  15. * *
  16. ***********************************************************************/
  17. /*
  18. * -lm test #3
  19. */
  20. #include <math.h>
  21. int
  22. main()
  23. {
  24. long double value = 0;
  25. int exp = 0;
  26. int r = 0;
  27. r |= ldexpl(value, exp) != 0;
  28. r |= frexpl(value, &exp) != 0;
  29. return r;
  30. }