1 files changed, 8 insertions, 99 deletions
diff --git a/testsuites/libtests/complex/docomplexf.c b/testsuites/libtests/complex/docomplexf.c
index ff2e73d3f6..b51f888232 100644
--- a/testsuites/libtests/complex/docomplexf.c
+++ b/testsuites/libtests/complex/docomplexf.c
@@ -11,106 +11,15 @@
  */
 
 #ifdef HAVE_CONFIG_H
-#include "config.h"
+  #include "config.h"
 #endif
 
-#include <complex.h>
-#include <stdio.h>
-
-extern void docomplexf (void);
-
-void
-docomplexf (void)
-{
-#ifndef NO_FLOAT
-  complex float ca, cb, cc;
-  float f1;
-
-  ca = 1.0 + 1.0 * I;
-  cb = 1.0 - 1.0 * I;
-
-  f1 = cabsf (ca);
-  fprintf (stdout, "cabsf  : %f\n", f1);
-
-  cc = cacosf (ca);
-  fprintf (stdout, "cacosf : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  cc = cacoshf (ca);
-  fprintf (stdout, "cacoshf: %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  f1 = cargf (ca);
-  fprintf (stdout, "cargf  : %f\n", f1);
-
-  cc = casinf (ca);
-  fprintf (stdout, "casinf : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  cc = casinhf (ca);
-  fprintf (stdout, "casinhf: %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  cc = catanf (ca);
-  fprintf (stdout, "catanf : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  cc = catanhf (ca);
-  fprintf (stdout, "catanhf: %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  cc = ccosf (ca);
-  fprintf (stdout, "ccosf  : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  cc = ccoshf (ca);
-  fprintf (stdout, "ccoshf : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  cc = cexpf (ca);
-  fprintf (stdout, "cexpf  : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  f1 = cimagf (ca);
-  fprintf (stdout, "cimagf : %f\n", f1);
-
-  cc = clogf (ca);
-  fprintf (stdout, "clogf  : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  cc = conjf (ca);
-  fprintf (stdout, "conjf  : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  cc = cpowf (ca, cb);
-  fprintf (stdout, "cpowf  : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  cc = cprojf (ca);
-  fprintf (stdout, "cprojf : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  f1 = crealf (ca);
-  fprintf (stdout, "crealf : %f\n", f1);
-
-  cc = csinf (ca);
-  fprintf (stdout, "csinf  : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  cc = csinhf (ca);
-  fprintf (stdout, "csinhf : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-
-  cc = csqrtf (ca);
-  fprintf (stdout, "csqrtf : %f %fi\n", crealf (cc),
-	   cimagf (cc));
+#ifdef NO_FLOAT
+  #define PROVIDE_EMPTY_FUNC
+#endif
 
-  cc = ctanf (ca);
-  fprintf (stdout, "ctanf  : %f %fi\n", crealf (cc),
-	   cimagf (cc));
+#define SUFFIX f
+#define FTYPE float
+#define PRI "%f"
 
-  cc = ctanhf (ca);
-  fprintf (stdout, "ctanhf : %f %fi\n", crealf (cc),
-	   cimagf (cc));
-#endif
-}
+#include "docomplex.h"