1 files changed, 9 insertions, 0 deletions
diff --git a/winsup/mingw/mingwex/complex/cargf.c b/winsup/mingw/mingwex/complex/cargf.c
new file mode 100755
index 000000000..360beefe4
--- /dev/null
+++ b/winsup/mingw/mingwex/complex/cargf.c
@@ -0,0 +1,9 @@
+#include <complex.h>
+float  __attribute__ ((const)) cargf (float _Complex _Z)
+{
+  float res;
+  __asm__ ("fpatan;"
+	   : "=t" (res) : "0" (__real__ _Z), "u" (__imag__ _Z) : "st(1)");
+  return res;
+}
+