@@@ tvec wip

[mLib] / test / tvec-types.c

diff --git a/test/tvec-types.c b/test/tvec-types.c
index 1984a1e3744f21802f3ebbadb0d15e856a0ab9ac..9709b6032401b3762aa0a469598ddd145b1d5b01 100644 (file)
--- a/test/tvec-types.c
+++ b/test/tvec-types.c
@@ -358,7 +358,7 @@ static void format_floating(const struct gprintf_ops *gops, void *go,
 static int eqish_floating_p(double x, double y,
                            const struct tvec_floatinfo *fi)
 {
-  double xx, yy, t;
+  double t;
 
   if (NANP(x)) return (NANP(y)); else if (NANP(y)) return (0);
   if (INFP(x)) return (x == y); else if (INFP(y)) return (0);