* mingwex/complex/cargs.c: New file.
* mingwex/Makefile.in: Really add carg.o to libmingwex.a.
This commit is contained in:
		@@ -1,3 +1,8 @@
 | 
			
		||||
2004-07-15  Danny Smith  <dannysmith@users.sourceforge.net>
 | 
			
		||||
 | 
			
		||||
	* mingwex/complex/cargs.c: New file.
 | 
			
		||||
	* mingwex/Makefile.in: Really add carg.o to libmingwex.a.
 | 
			
		||||
 | 
			
		||||
2004-07-15  Corinna Vinschen  <corinna@vinschen.de>
 | 
			
		||||
 | 
			
		||||
	* Makefile.in (INCLUDES): Temporarily revert previous change.
 | 
			
		||||
 
 | 
			
		||||
@@ -67,7 +67,7 @@ STDIO_DISTFILES = \
 | 
			
		||||
	vfscanf.c vfwscanf.c vscanf.c vsscanf.c vswscanf.c vwscanf.c
 | 
			
		||||
 | 
			
		||||
COMPLEX_DISTFILES = \
 | 
			
		||||
	cabs.c cacos.c cacosh.c casin.c casinh.c carg.c catan.c catanh.c \
 | 
			
		||||
	cabs.c cacos.c cacosh.c carg.c casin.c casinh.c catan.c catanh.c \
 | 
			
		||||
	ccos.c ccosh.c cexp.c cimag.c clog.c cpow.c cproj.c creal.c \
 | 
			
		||||
	csin.c csinh.c csqrt.c ctan.c ctanh.c
 | 
			
		||||
 | 
			
		||||
@@ -151,7 +151,7 @@ POSIX_OBJS = \
 | 
			
		||||
REPLACE_OBJS = \
 | 
			
		||||
	mingw-fseek.o
 | 
			
		||||
COMPLEX_OBJS = \
 | 
			
		||||
	cabs.o cacos.o cacosh.o casin.o casinh.o catan.o catanh.o \
 | 
			
		||||
	cabs.o cacos.o cacosh.o carg.o casin.o casinh.o catan.o catanh.o \
 | 
			
		||||
	ccos.o ccosh.o cexp.o cimag.o clog.o cpow.o cproj.o creal.o \
 | 
			
		||||
	csin.o csinh.o csqrt.o ctan.o ctanh.o 
 | 
			
		||||
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										9
									
								
								winsup/mingw/mingwex/complex/carg.c
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										9
									
								
								winsup/mingw/mingwex/complex/carg.c
									
									
									
									
									
										Executable file
									
								
							@@ -0,0 +1,9 @@
 | 
			
		||||
#include <complex.h>
 | 
			
		||||
double  __attribute__ ((const)) carg (double _Complex _Z)
 | 
			
		||||
{
 | 
			
		||||
  double res;
 | 
			
		||||
  __asm__ ("fpatan;"
 | 
			
		||||
	   : "=t" (res) : "0" (__real__ _Z), "u" (__imag__ _Z) : "st(1)");
 | 
			
		||||
  return res;
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
		Reference in New Issue
	
	Block a user