===================================================================
@@ -29,12 +29,16 @@ static void test ()
vector unsigned long vul;
vector double vd;
+ unsigned i;
init ();
vul = vec_ldl (0, (vector unsigned long *)svul);
vd = vec_ldl (0, (vector double *)svd);
- check (vec_all_eq (vul, evul), "vul");
- check (vec_all_eq (vd, evd ), "vd" );
+ for (i = 0; i < 2; ++i)
+ {
+ check (vul[i] == evul[i], "vul");
+ check (vd[i] == evd[i], "vd" );
+ }
}
===================================================================
@@ -29,12 +29,16 @@ static void test ()
vector unsigned long vul;
vector double vd;
+ unsigned i;
init ();
vul = vec_ld (0, (vector unsigned long *)svul);
vd = vec_ld (0, (vector double *)svd);
- check (vec_all_eq (vul, evul), "vul");
- check (vec_all_eq (vd, evd ), "vd" );
+ for (i = 0; i < 2; ++i)
+ {
+ check (vul[i] == evul[i], "vul");
+ check (vd[i] == evd[i], "vd" );
+ }
}
===================================================================
@@ -24,12 +24,16 @@ static void test ()
vector unsigned long vul;
vector double vd;
+ unsigned i;
init ();
vul = vec_ld (0, (vector unsigned long *)svul);
vd = vec_ld (0, (vector double *)svd);
- check (vec_all_eq (vul, evul), "vul");
- check (vec_all_eq (vd, evd ), "vd" );
+ for (i = 0; i < 2; ++i)
+ {
+ check (vul[i] == evul[i], "vul");
+ check (vd[i] == evd[i], "vd" );
+ }
}
===================================================================
@@ -9,6 +9,11 @@ static int vec_long_eq (vector long x, vector long
return (x[0] == y[0] && x[1] == y[1]);
}
+static int vec_double_eq (vector double x, vector double y)
+{
+ return (x[0] == y[0] && x[1] == y[1]);
+}
+
static void test()
{
/* Input vectors. */
@@ -41,6 +46,6 @@ static void test()
check (vec_long_eq (vlh, vlrh), "vlh");
check (vec_long_eq (vll, vlrl), "vll");
- check (vec_all_eq (vdh, vdrh), "vdh" );
- check (vec_all_eq (vdl, vdrl), "vdl" );
+ check (vec_double_eq (vdh, vdrh), "vdh" );
+ check (vec_double_eq (vdl, vdrl), "vdl" );
}
===================================================================
@@ -24,12 +24,16 @@ static void test ()
vector unsigned long vul;
vector double vd;
+ unsigned i;
init ();
vul = vec_ldl (0, (vector unsigned long *)svul);
vd = vec_ldl (0, (vector double *)svd);
- check (vec_all_eq (vul, evul), "vul");
- check (vec_all_eq (vd, evd ), "vd" );
+ for (i = 0; i < 2; ++i)
+ {
+ check (vul[i] == evul[i], "vul");
+ check (vd[i] == evd[i], "vd" );
+ }
}
===================================================================
@@ -9,6 +9,11 @@ static int vec_long_eq (vector long x, vector long
return (x[0] == y[0] && x[1] == y[1]);
}
+static int vec_double_eq (vector double x, vector double y)
+{
+ return (x[0] == y[0] && x[1] == y[1]);
+}
+
static void test()
{
/* Input vectors. */
@@ -34,6 +39,6 @@ static void test()
check (vec_long_eq (vlh, vlrh), "vlh");
check (vec_long_eq (vll, vlrl), "vll");
- check (vec_all_eq (vdh, vdrh), "vdh" );
- check (vec_all_eq (vdl, vdrl), "vdl" );
+ check (vec_double_eq (vdh, vdrh), "vdh" );
+ check (vec_double_eq (vdl, vdrl), "vdl" );
}