+++ /dev/null
-/* This test tests complex conjugate and passing/returning of
- complex parameter. */
-
-#include <stdlib.h>
-#include <stdio.h>
-
-int err;
-
-#define TEST(TYPE, FUNC) \
-__complex__ TYPE \
-ctest_ ## FUNC (__complex__ TYPE x) \
-{ \
- __complex__ TYPE res; \
- \
- res = ~x; \
- \
- return res; \
-} \
- \
-void \
-test_ ## FUNC (void) \
-{ \
- __complex__ TYPE res, x; \
- \
- x = 1.0 + 2.0i; \
- \
- res = ctest_ ## FUNC (x); \
- \
- if (res != 1.0 - 2.0i) \
- { \
- printf ("test_" #FUNC " failed\n"); \
- ++err; \
- } \
-}
-
-
-TEST(float, float)
-TEST(double, double)
-TEST(long double, long_double)
-TEST(int, int)
-TEST(long int, long_int)
-
-int
-main (void)
-{
-
- err = 0;
-
- test_float ();
- test_double ();
- test_long_double ();
- test_int ();
- test_long_int ();
-
- if (err != 0)
- abort ();
-
- return 0;
-}