remove warnings from -Wall -Wextra

39 files changed, 45 insertions, 28 deletions

diff --git a/src/complex/cabs.c b/src/complex/cabs.c
index 572163a6..3e2d1ac8 100644
--- a/src/complex/cabs.c
+++ b/src/complex/cabs.c
@@ -5,7 +5,7 @@
 
 TYPE TGFN(cabs)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/cacos.c b/src/complex/cacos.c
index 4dfeea3b..b669f478 100644
--- a/src/complex/cacos.c
+++ b/src/complex/cacos.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(cacos)(TYPE complex z)
 {
-	return I;
+	return z;
 }
 
 /*d
diff --git a/src/complex/cacosh.c b/src/complex/cacosh.c
index 31908738..9f7d6aea 100644
--- a/src/complex/cacosh.c
+++ b/src/complex/cacosh.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(cacosh)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 
diff --git a/src/complex/carg.c b/src/complex/carg.c
index 918e6f4d..092b1194 100644
--- a/src/complex/carg.c
+++ b/src/complex/carg.c
@@ -5,7 +5,7 @@
 
 TYPE TGFN(carg)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/casin.c b/src/complex/casin.c
index 9e13ce58..45084641 100644
--- a/src/complex/casin.c
+++ b/src/complex/casin.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(casin)(TYPE complex z)
 {
-	return 0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/casinh.c b/src/complex/casinh.c
index 0b1d1821..9251ce37 100644
--- a/src/complex/casinh.c
+++ b/src/complex/casinh.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(casinh)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/catan.c b/src/complex/catan.c
index 1cfe85b1..4ae60ce6 100644
--- a/src/complex/catan.c
+++ b/src/complex/catan.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(catan)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/catanh.c b/src/complex/catanh.c
index dc218e34..2be96dfc 100644
--- a/src/complex/catanh.c
+++ b/src/complex/catanh.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(catanh)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/ccos.c b/src/complex/ccos.c
index ff2ec58e..329c66e7 100644
--- a/src/complex/ccos.c
+++ b/src/complex/ccos.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(ccos)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/ccosh.c b/src/complex/ccosh.c
index 86c00405..0e05250a 100644
--- a/src/complex/ccosh.c
+++ b/src/complex/ccosh.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(ccosh)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/cexp.c b/src/complex/cexp.c
index ff74c58d..d343a02e 100644
--- a/src/complex/cexp.c
+++ b/src/complex/cexp.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(cexp)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/clog.c b/src/complex/clog.c
index 731a468d..ad8ec1da 100644
--- a/src/complex/clog.c
+++ b/src/complex/clog.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(clog)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/cpow.c b/src/complex/cpow.c
index 70494666..3989f6fb 100644
--- a/src/complex/cpow.c
+++ b/src/complex/cpow.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(cpow)(TYPE complex x, TYPE complex y)
 {
-	return 0.0;
+	return x * y;
 }
 
 /*d
diff --git a/src/complex/cproj.c b/src/complex/cproj.c
index 6a84caf8..ce83a62c 100644
--- a/src/complex/cproj.c
+++ b/src/complex/cproj.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(cproj)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/csin.c b/src/complex/csin.c
index 6ca3c3a3..13006c01 100644
--- a/src/complex/csin.c
+++ b/src/complex/csin.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(csin)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/csinh.c b/src/complex/csinh.c
index 0b3e2c08..d1ad8626 100644
--- a/src/complex/csinh.c
+++ b/src/complex/csinh.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(csinh)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/csqrt.c b/src/complex/csqrt.c
index d0e273c9..f3a735ca 100644
--- a/src/complex/csqrt.c
+++ b/src/complex/csqrt.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(csqrt)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/ctan.c b/src/complex/ctan.c
index 2a2d77ef..31bbd8c4 100644
--- a/src/complex/ctan.c
+++ b/src/complex/ctan.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(ctan)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/complex/ctanh.c b/src/complex/ctanh.c
index d1e802e1..cf203dd5 100644
--- a/src/complex/ctanh.c
+++ b/src/complex/ctanh.c
@@ -5,7 +5,7 @@
 
 TYPE complex TGFN(ctanh)(TYPE complex z)
 {
-	return 0.0;
+	return z;
 }
 
 /*d
diff --git a/src/fenv/fegetenv.c b/src/fenv/fegetenv.c
index b4795af7..16ffae99 100644
--- a/src/fenv/fegetenv.c
+++ b/src/fenv/fegetenv.c
@@ -2,6 +2,7 @@
 
 int fegetenv(fenv_t *envp)
 {
+	(void)envp;
 	return 0;
 }
 
diff --git a/src/fenv/fegetexceptflag.c b/src/fenv/fegetexceptflag.c
index 45e4bf98..ed41fb83 100644
--- a/src/fenv/fegetexceptflag.c
+++ b/src/fenv/fegetexceptflag.c
@@ -2,7 +2,8 @@
 
 int fegetexceptflag(fexcept_t *flagp, int excepts)
 {
-	return excepts;
+	(void)flagp; (void)excepts;
+	return 0;
 }
 
 /*d
diff --git a/src/fenv/feholdexcept.c b/src/fenv/feholdexcept.c
index 11b46ede..7be0d7f7 100644
--- a/src/fenv/feholdexcept.c
+++ b/src/fenv/feholdexcept.c
@@ -2,6 +2,7 @@
 
 int feholdexcept(fenv_t *envp)
 {
+	(void)envp;
 	return 0;
 }
 
diff --git a/src/fenv/fesetenv.c b/src/fenv/fesetenv.c
index 1d6ea32a..b95bbae6 100644
--- a/src/fenv/fesetenv.c
+++ b/src/fenv/fesetenv.c
@@ -2,6 +2,7 @@
 
 int fesetenv(const fenv_t *envp)
 {
+	(void)envp;
 	return 0;
 }
 
diff --git a/src/fenv/fesetexceptflag.c b/src/fenv/fesetexceptflag.c
index 07fc7f5f..1c2a0ce9 100644
--- a/src/fenv/fesetexceptflag.c
+++ b/src/fenv/fesetexceptflag.c
@@ -2,6 +2,7 @@
 
 int fesetexceptflag(const fexcept_t *flagp, int excepts)
 {
+	(void)flagp; (void)excepts;
 	return 0;
 }
 
diff --git a/src/fenv/feupdateenv.c b/src/fenv/feupdateenv.c
index b11a20fc..ce979808 100644
--- a/src/fenv/feupdateenv.c
+++ b/src/fenv/feupdateenv.c
@@ -2,6 +2,7 @@
 
 int feupdateenv(const fenv_t *envp)
 {
+	(void)envp;
 	return 0;
 }
 
diff --git a/src/math/acosh.c b/src/math/acosh.c
index 291087b2..aeb15816 100644
--- a/src/math/acosh.c
+++ b/src/math/acosh.c
@@ -4,7 +4,7 @@
 
 TYPE TGFN(acosh)(TYPE x)
 {
-	return 0.0;
+	return x;
 }
 
 /*
diff --git a/src/math/asinh.c b/src/math/asinh.c
index 08700a25..421f574d 100644
--- a/src/math/asinh.c
+++ b/src/math/asinh.c
@@ -4,7 +4,7 @@
 
 TYPE TGFN(asinh)(TYPE x)
 {
-	return 0.0;
+	return x;
 }
 
 /*
diff --git a/src/math/atanh.c b/src/math/atanh.c
index e99a26b7..eef1cfc6 100644
--- a/src/math/atanh.c
+++ b/src/math/atanh.c
@@ -4,7 +4,7 @@
 
 TYPE TGFN(atanh)(TYPE x)
 {
-	return 0.0;
+	return x;
 }
 
 /*
diff --git a/src/math/copysign.c b/src/math/copysign.c
index 6e5cb127..a462348b 100644
--- a/src/math/copysign.c
+++ b/src/math/copysign.c
@@ -4,7 +4,7 @@
 
 TYPE TGFN(copysign)(TYPE x, TYPE y)
 {
-	return 0.0;
+	return x - y;
 }
 
 /*
diff --git a/src/math/nan.c b/src/math/nan.c
index c5615b98..bd0cbbc4 100644
--- a/src/math/nan.c
+++ b/src/math/nan.c
@@ -4,6 +4,7 @@
 
 TYPE TGFN(nan)(const char *tagp)
 {
+	(void)tagp;
 	return 0.0;
 }
 
diff --git a/src/math/nearbyint.c b/src/math/nearbyint.c
index c3994a62..d5d2cc21 100644
--- a/src/math/nearbyint.c
+++ b/src/math/nearbyint.c
@@ -4,7 +4,7 @@
 
 TYPE TGFN(nearbyint)(TYPE x)
 {
-	return 0.0;
+	return x;
 }
 
 /*
diff --git a/src/math/remquo.c b/src/math/remquo.c
index 88e59c0f..7a117ba7 100644
--- a/src/math/remquo.c
+++ b/src/math/remquo.c
@@ -4,6 +4,7 @@
 
 TYPE TGFN(remquo)(TYPE x, TYPE y, int *quo)
 {
+	(void)quo;
 	return x - y;
 }
 
diff --git a/src/math/tgamma.c b/src/math/tgamma.c
index 25778059..b80584ac 100644
--- a/src/math/tgamma.c
+++ b/src/math/tgamma.c
@@ -4,7 +4,7 @@
 
 TYPE TGFN(tgamma)(TYPE x)
 {
-	return 0.0;
+	return x;
 }
 
 /*
diff --git a/src/math/trunc.c b/src/math/trunc.c
index 77671f5d..4b1081a6 100644
--- a/src/math/trunc.c
+++ b/src/math/trunc.c
@@ -4,7 +4,7 @@
 
 TYPE TGFN(trunc)(TYPE x)
 {
-	return 0.0;
+	return x;
 }
 
 /*
diff --git a/src/stdlib/strtof.c b/src/stdlib/strtof.c
index b3da169c..4056d578 100644
--- a/src/stdlib/strtof.c
+++ b/src/stdlib/strtof.c
@@ -2,6 +2,8 @@
 
 float strtof(const char * restrict nptr, char ** restrict endptr)
 {
+	(void)nptr; (void)endptr;
+	return 0;
 }
 
 /*
diff --git a/src/stdlib/strtold.c b/src/stdlib/strtold.c
index 185f359e..eeb0b8b0 100644
--- a/src/stdlib/strtold.c
+++ b/src/stdlib/strtold.c
@@ -2,6 +2,8 @@
 
 long double strtold(const char * restrict nptr, char ** restrict endptr)
 {
+	(void)nptr; (void)endptr;
+	return 0;
 }
 
 /*
diff --git a/src/string/_strtok.h b/src/string/_strtok.h
index 09c0ba96..56ad0dca 100644
--- a/src/string/_strtok.h
+++ b/src/string/_strtok.h
@@ -1 +1,2 @@
-	
+	(void)state; (void)current;
+	(void)s1; (void)s2;
diff --git a/src/wchar/wcstof.c b/src/wchar/wcstof.c
index c9de199b..75aafbbf 100644
--- a/src/wchar/wcstof.c
+++ b/src/wchar/wcstof.c
@@ -2,6 +2,8 @@
 
 float wcstof(const wchar_t * restrict nptr, wchar_t ** restrict endptr)
 {
+	(void)nptr; (void)endptr;
+	return 0;
 }
 
 /*
diff --git a/src/wchar/wcstold.c b/src/wchar/wcstold.c
index 32001008..b105606f 100644
--- a/src/wchar/wcstold.c
+++ b/src/wchar/wcstold.c
@@ -2,6 +2,8 @@
 
 long double wcstold(const wchar_t * restrict nptr, wchar_t ** restrict endptr)
 {
+	(void)nptr; (void)endptr;
+	return 0;
 }
 
 /*