s390: Add test for short/extended vector float insns

Several issues with vector floating point instructions have gone unnoticed
due to a lack of test coverage in this area.  Add a test case that
improves the coverage, particuarly when dealing with short and extended
floating point formats.
This commit is contained in:
Andreas Arnez 2022-10-26 19:45:30 +02:00
parent 1b8dcec1b4
commit d6073d34d4
7 changed files with 816 additions and 2 deletions

1
.gitignore vendored
View File

@ -2032,6 +2032,7 @@
/none/tests/s390x/vector_float
/none/tests/s390x/misc3
/none/tests/s390x/vec2
/none/tests/s390x/vec2_float
# /none/tests/scripts/
/none/tests/scripts/*.dSYM

View File

@ -20,7 +20,7 @@ INSN_TESTS = clc clcle cvb cvd icm lpr tcxb lam_stam xc mvst add sub mul \
spechelper-icm-1 spechelper-icm-2 spechelper-tmll \
spechelper-tm laa vector lsc2 ppno vector_string vector_integer \
vector_float add-z14 sub-z14 mul-z14 bic \
misc3 vec2
misc3 vec2 vec2_float
if BUILD_DFP_TESTS
INSN_TESTS += dfp-1 dfp-2 dfp-3 dfp-4 dfptest dfpext dfpconv srnmt pfpo
@ -75,3 +75,4 @@ vector_string_CFLAGS = $(AM_CFLAGS) -march=z13 -DS390_TEST_COUNT=5
vector_integer_CFLAGS = $(AM_CFLAGS) -march=z13 -DS390_TEST_COUNT=4
vector_float_CFLAGS = $(AM_CFLAGS) -march=z13 -DS390_TEST_COUNT=4
vec2_CFLAGS = $(AM_CFLAGS) -march=z13
vec2_float_CFLAGS = $(AM_CFLAGS) -march=z13

View File

@ -0,0 +1,419 @@
#include <stdio.h>
#define VECTOR __attribute__ ((vector_size (16)))
typedef unsigned int VECTOR u2_v;
typedef unsigned long VECTOR u3_v;
typedef unsigned long VECTOR u4_v; /* avoid 128-bit integers */
typedef float VECTOR f2_v;
typedef double VECTOR f3_v;
typedef long double VECTOR f4_v;
#define INF (1./0.)
#define NAN (0./0.)
static const u2_v vec_u2_a = { -1, 0x7ffffff0, 42, 0 };
static const u2_v vec_u2_b = { 0x7fffff80, 1, 1000, -0x7caffe };
static const u2_v vec_u2_c = { 0x7fffff, 0x70000000, -10000, 0xffff };
static const u2_v vec_u2_e = { 0x7fffffff, 0x8000000, 0, 42 };
static const f2_v vec_f2_a = { 16777215., -16777215., 42.5, 10000. };
static const f2_v vec_f2_b = { 4., 3., 42.5, 1. };
static const f2_v vec_f2_c = { 0., INF, -0., -INF };
static const f2_v vec_f2_d = { -16777214., 16777214., -23., -9999. };
static const f2_v vec_f2_e = { NAN, -NAN, NAN, -NAN };
static const f3_v vec_f3_a = { (double) ((1UL << 52) - 1), -16777215. };
static const f3_v vec_f3_b = { 0.1, 3. };
static const f3_v vec_f3_c = { -0., INF };
static const f3_v vec_f3_e = { NAN, -NAN };
static const f4_v vec_f4_a = { 16777215.0L };
static const f4_v vec_f4_b = { 4.0L };
static const f4_v vec_f4_c = { INF };
static const f4_v vec_f4_d = { -23.0 };
static const f4_v vec_f4_e = { NAN };
static const u3_v vec_ini = { 0x0112233445566778, 0x899aabbccddeeff0 };
/* -- Dump a vector depending on FP format and single-element control -- */
static void dump_cc(int cc)
{
if (cc) {
printf(" cc=%d", cc);
}
putchar('\n');
}
static void dump_vu2(u2_v u)
{
printf("\t%d | %d | %d | %d", u[0], u[1], u[2], u[3]);
}
static void dump_wu2(u2_v u)
{
printf("\t%d | - | - | -", u[0]);
}
static void dump_wu4(u4_v u)
{
if (u[0] == 0) {
printf("\t%ld", u[1]);
} else if (u[0] == -1) {
printf("\t-%ld", -u[1]);
} else {
printf("\t0x%016lx%016lx", u[0], u[1]);
}
}
static void dump_vf2(f2_v v)
{
printf("\t%a | %a | %a | %a", v[0], v[1], v[2], v[3]);
}
static void dump_ef2(f2_v v)
{
printf("\t%a | - | %a | -", v[0], v[2]);
}
static void dump_vf3(f3_v v)
{
printf("\t%a | %a", v[0], v[1]);
}
static void dump_wf3(f3_v v)
{
printf("\t%a | -", v[0]);
}
static void dump_wf2(f2_v v)
{
printf("\t%a | - | - | -", v[0]);
}
static void dump_wf4(f4_v v)
{
printf("\t%La", v[0]);
}
/* -- Vector unary operators -- */
#define TEST_EXEC(opc1,opc2,fmt,ty1,ty2,insn,m3,m4,m5) \
do { \
puts(#insn); \
test_##insn##_##m3##_##m4##_##m5(vec_##ty2##_a); \
test_##insn##_##m3##_##m4##_##m5(vec_##ty2##_b); \
test_##insn##_##m3##_##m4##_##m5(vec_##ty2##_c); \
test_##insn##_##m3##_##m4##_##m5(vec_##ty2##_e); \
} while (0)
#define TEST_GENERATE(opc1,opc2,fmt,ty1,ty2,insn,m3,m4,m5) \
static void test_##insn##_##m3##_##m4##_##m5(ty2##_v a) \
{ \
ty1##_v out = (ty1##_v) vec_ini; \
int cc = -1; \
__asm__( \
"cr 0,0\n\t" \
".insn vrr,0x" #opc1 "00000000" #opc2 ",%[out],%[a],0," \
#m3 "," #m4 "," #m5 "\n\t" \
"ipm %[cc]\n\t" \
"srl %[cc],28" \
: [cc]"=d" (cc), [out]"+v" (out) \
: [a]"v" (a) \
: "cc"); \
dump_##fmt##ty1(out); \
dump_cc(cc); \
}
#define INSNS \
XTEST(e7,c0, v,u2, f2, vclfeb, 2,4,0); \
XTEST(e7,c0, w,u2, f2, wclfeb, 2,12,0); \
XTEST(e7,c1, v,f2, u2, vcelfb, 2,4,0); \
XTEST(e7,c1, w,f2, u2, wcelfb, 2,12,0); \
XTEST(e7,c2, v,u2, f2, vcfeb, 2,4,0); \
XTEST(e7,c2, w,u2, f2, wcfeb, 2,12,0); \
XTEST(e7,c3, v,f2, u2, vcefb, 2,4,0); \
XTEST(e7,c3, w,f2, u2, wcefb, 2,12,0); \
XTEST(e7,c4, v,f3, f2, vldeb, 2,0,0); \
XTEST(e7,c4, w,f3, f2, wldeb, 2,8,0); \
XTEST(e7,c4, w,f4, f3, wflld, 3,8,0); \
XTEST(e7,c5, e,f2, f3, vledb, 3,4,0); \
XTEST(e7,c5, w,f2, f3, wledb, 3,12,0); \
XTEST(e7,c5, w,f3, f4, wflrx, 4,12,0); \
XTEST(e7,c7, v,f2, f2, vfisb, 2,0,0); \
XTEST(e7,c7, w,f2, f2, wfisb, 2,8,0); \
XTEST(e7,c7, w,f4, f4, wfixb, 4,8,0); \
XTEST(e7,cc, v,f2, f2, vflcsb, 2,0,0); \
XTEST(e7,cc, w,f2, f2, wflcsb, 2,8,0); \
XTEST(e7,cc, w,f4, f4, wflcxb, 4,8,0); \
XTEST(e7,cc, v,f2, f2, vflnsb, 2,0,1); \
XTEST(e7,cc, w,f2, f2, wflnsb, 2,8,1); \
XTEST(e7,cc, w,f4, f4, wflnxb, 4,8,1); \
XTEST(e7,cc, v,f2, f2, vflpsb, 2,0,2); \
XTEST(e7,cc, w,f2, f2, wflpsb, 2,8,2); \
XTEST(e7,cc, w,f4, f4, wflpxb, 4,8,2); \
XTEST(e7,ce, v,f2, f2, vfsqsb, 2,0,0); \
XTEST(e7,ce, w,f2, f2, wfsqsb, 2,8,0); \
XTEST(e7,ce, w,f4, f4, wfsqxb, 4,8,0);
#define XTEST TEST_GENERATE
INSNS
#undef XTEST
static void test_all_unops()
{
#define XTEST TEST_EXEC
INSNS
#undef XTEST
}
#undef INSNS
#undef TEST_GENERATE
#undef TEST_EXEC
/* -- Vector binary operators -- */
#define TEST_EXEC(opc1,opc2,fmt,ty1,insn,m4,m5,m6) \
do { \
puts(#insn); \
test_##insn##_##m4##_##m5##_##m6(vec_f##m4##_a, vec_f##m4##_b); \
test_##insn##_##m4##_##m5##_##m6(vec_f##m4##_b, vec_f##m4##_a); \
test_##insn##_##m4##_##m5##_##m6(vec_f##m4##_a, vec_f##m4##_c); \
test_##insn##_##m4##_##m5##_##m6(vec_f##m4##_d, vec_f##m4##_e); \
} while (0)
#define TEST_GENERATE(opc1,opc2,fmt,ty1,insn,m4,m5,m6) \
static void test_##insn##_##m4##_##m5##_##m6(f##m4##_v a, f##m4##_v b) \
{ \
ty1##_v out = (ty1##_v) vec_ini; \
int cc = -1; \
__asm__( \
"cr 0,0\n\t" \
".insn vrr,0x" #opc1 "00000000" #opc2 ",%[out],%[a],%[b]," \
#m4 "," #m5 "," #m6 "\n\t" \
"ipm %[cc]\n\t" \
"srl %[cc],28" \
: [cc]"=d" (cc), [out] "+v" (out) \
: [a] "v" (a), [b] "v" (b) \
: "cc"); \
dump_##fmt##ty1(out); \
dump_cc(cc); \
}
#define INSNS \
XTEST(e7,e2, v,f2, vfssb, 2,0,0); \
XTEST(e7,e2, w,f2, wfssb, 2,8,0); \
XTEST(e7,e2, w,f4, wfsxb, 4,8,0); \
XTEST(e7,e3, v,f2, vfasb, 2,0,0); \
XTEST(e7,e3, w,f2, wfasb, 2,8,0); \
XTEST(e7,e3, w,f4, wfaxb, 4,8,0); \
XTEST(e7,e5, v,f2, vfdsb, 2,0,0); \
XTEST(e7,e5, w,f2, wfdsb, 2,8,0); \
XTEST(e7,e5, w,f4, wfdxb, 4,8,0); \
XTEST(e7,e7, v,f2, vfmsb, 2,0,0); \
XTEST(e7,e7, w,f2, wfmsb, 2,8,0); \
XTEST(e7,e7, w,f4, wfmxb, 4,8,0); \
XTEST(e7,e8, v,u2, vfcesb, 2,0,0); \
XTEST(e7,e8, w,u2, wfcesb, 2,8,0); \
XTEST(e7,e8, w,u4, wfcexb, 4,8,0); \
XTEST(e7,e8, v,u2, vfcesbs, 2,0,1); \
XTEST(e7,e8, w,u2, wfcesbs, 2,8,1); \
XTEST(e7,e8, w,u4, wfcexbs, 4,8,1); \
XTEST(e7,ea, v,u2, vfchesb, 2,0,0); \
XTEST(e7,ea, w,u2, wfchesb, 2,8,0); \
XTEST(e7,ea, w,u4, wfchexb, 4,8,0); \
XTEST(e7,ea, v,u2, vfchesbs, 2,0,1); \
XTEST(e7,ea, w,u2, wfchesbs, 2,8,1); \
XTEST(e7,ea, w,u4, wfchexbs, 4,8,1); \
XTEST(e7,ee, v,f2, vfminsb, 2,0,0); \
XTEST(e7,ee, w,f2, wfminsb, 2,8,0); \
XTEST(e7,ee, w,f4, wfminxb, 4,8,0); \
XTEST(e7,ef, v,f2, vfmaxsb, 2,0,0); \
XTEST(e7,ef, w,f2, wfmaxsb, 2,8,0); \
XTEST(e7,ef, w,f4, wfmaxxb, 4,8,0); \
XTEST(e7,eb, v,u2, vfchsb, 2,0,0); \
XTEST(e7,eb, w,u2, wfchsb, 2,8,0); \
XTEST(e7,eb, w,u4, wfchxb, 4,8,0); \
XTEST(e7,eb, v,u2, vfchsbs, 2,0,1); \
XTEST(e7,eb, w,u2, wfchsbs, 2,8,1); \
XTEST(e7,eb, w,u4, wfchxbs, 4,8,1);
#define XTEST TEST_GENERATE
INSNS
#undef XTEST
static void test_all_binops()
{
#define XTEST TEST_EXEC
INSNS
#undef XTEST
}
#undef INSNS
#undef TEST_GENERATE
#undef TEST_EXEC
/* -- Vector ternary operators -- */
#define TEST_EXEC(opc1,opc2,fmt,ty,insn,m5,m6) \
do { \
puts(#insn); \
test_##insn##_##m5##_##m6(vec_##ty##_a, vec_##ty##_b, vec_##ty##_c); \
test_##insn##_##m5##_##m6(vec_##ty##_b, vec_##ty##_a, vec_##ty##_d); \
} while (0)
#define TEST_GENERATE(opc1,opc2,fmt,ty,insn,m5,m6) \
static void test_##insn##_##m5##_##m6(ty##_v a, ty##_v b, ty##_v c) \
{ \
ty##_v out = (ty##_v) vec_ini; \
int cc = -1; \
register ty##_v my_c __asm__("v7") = c; \
__asm__( \
"cr 0,0\n\t" \
".insn vrr,0x" #opc1 "000" #m6 "0000" #opc2 ",%[out],%[a]," \
"%[b],7," #m5 ",0\n\t" \
"ipm %[cc]\n\t" \
"srl %[cc],28" \
: [cc]"=d" (cc), [out] "+v" (out) \
: [a] "v" (a), [b] "v" (b), [c] "v" (my_c) \
: "cc"); \
dump_##fmt##ty(out); \
dump_cc(cc); \
}
#define INSNS \
XTEST(e7,8e, v,f2, vfmssb, 0,2); \
XTEST(e7,8e, w,f2, wfmssb, 8,2); \
XTEST(e7,8e, w,f4, wfmsxb, 8,4); \
XTEST(e7,8f, v,f2, vfmasb, 0,2); \
XTEST(e7,8f, w,f2, wfmasb, 8,2); \
XTEST(e7,8f, w,f4, wfmaxb, 8,4); \
XTEST(e7,9e, v,f2, vfnmssb, 0,2); \
XTEST(e7,9e, w,f2, wfnmssb, 8,2); \
XTEST(e7,9e, w,f4, wfnmsxb, 8,4); \
XTEST(e7,9f, v,f2, vfnmasb, 0,2); \
XTEST(e7,9f, w,f2, wfnmasb, 8,2); \
XTEST(e7,9f, w,f4, wfnmaxb, 8,4);
#define XTEST TEST_GENERATE
INSNS
#undef XTEST
static void test_all_ternops()
{
#define XTEST TEST_EXEC
INSNS
#undef XTEST
}
#undef INSNS
#undef TEST_GENERATE
#undef TEST_EXEC
/* -- Vector scalar compare operators -- */
#define TEST_EXEC(opc1,opc2,ty,insn,m3,m4) \
do { \
puts(#insn); \
test_##insn##_##m3##_##m4(vec_##ty##_a, vec_##ty##_b); \
test_##insn##_##m3##_##m4(vec_##ty##_b, vec_##ty##_a); \
test_##insn##_##m3##_##m4(vec_##ty##_c, vec_##ty##_c); \
test_##insn##_##m3##_##m4(vec_##ty##_a, vec_##ty##_e); \
} while (0)
#define TEST_GENERATE(opc1,opc2,ty,insn,m3,m4) \
static void test_##insn##_##m3##_##m4(ty##_v a, ty##_v b) \
{ \
int cc = -1; \
__asm__( \
"cr 0,0\n\t" \
".insn vrr,0x" #opc1 "00000000" #opc2 ",%[a],%[b],0," \
#m3 "," #m4 ",0\n\t" \
"ipm %[cc]\n\t" \
"srl %[cc],28" \
: [cc]"=d" (cc) \
: [a]"v" (a), [b]"v" (b) \
: "cc"); \
printf("\tcc=%d\n", cc); \
}
#define INSNS \
XTEST(e7,cb, f2, wfcsb, 2,0); \
XTEST(e7,cb, f4, wfcxb, 4,0);
#define XTEST TEST_GENERATE
INSNS
#undef XTEST
static void test_all_scalar_compares()
{
#define XTEST TEST_EXEC
INSNS
#undef XTEST
}
#undef INSNS
#undef TEST_GENERATE
#undef TEST_EXEC
/* -- Vector FP test data class -- */
#define TEST_EXEC(opc1,opc2,fmt,ty1,ty2,insn,i3,m4,m5) \
do { \
puts(#insn); \
test_##insn##_##m3##_##m4(vec_##ty2##_a); \
test_##insn##_##m3##_##m4(vec_##ty2##_b); \
test_##insn##_##m3##_##m4(vec_##ty2##_c); \
test_##insn##_##m3##_##m4(vec_##ty2##_d); \
test_##insn##_##m3##_##m4(vec_##ty2##_e); \
} while (0)
#define TEST_GENERATE(opc1,opc2,fmt,ty1,ty2,insn,i3,m4,m5) \
static void test_##insn##_##m3##_##m4(ty2##_v a) \
{ \
ty1##_v out = (ty1##_v) vec_ini; \
int cc = -1; \
__asm__( \
"cr 0,0\n\t" \
".insn vri,0x" #opc1 "00000000" #opc2 ",%[out],%[a]," \
#i3 "," #m4 "," #m5 "\n\t" \
"ipm %[cc]\n\t" \
"srl %[cc],28" \
: [cc]"=d" (cc), [out]"+v" (out) \
: [a]"v" (a) \
: "cc"); \
dump_##fmt##ty1(out); \
dump_cc(cc); \
}
#define INSNS \
XTEST(e7,4a, v,u2,f2, vftcisb, 0x864,2,0); \
XTEST(e7,4a, w,u2,f2, wftcisb, 0x520,2,8); \
XTEST(e7,4a, w,u4,f4, wftcixb, 0x3c0,4,0);
#define XTEST TEST_GENERATE
INSNS
#undef XTEST
static void test_all_vftci()
{
#define XTEST TEST_EXEC
INSNS
#undef XTEST
}
#undef INSNS
#undef TEST_GENERATE
#undef TEST_EXEC
int main()
{
test_all_unops();
test_all_binops();
test_all_ternops();
test_all_scalar_compares();
test_all_vftci();
return 0;
}

View File

@ -0,0 +1,2 @@

View File

@ -0,0 +1,389 @@
vclfeb
16777215 | 0 | 42 | 10000
4 | 3 | 42 | 1
0 | -1 | 0 | 0
0 | 0 | 0 | 0
wclfeb
16777215 | - | - | -
4 | - | - | -
0 | - | - | -
0 | - | - | -
vcelfb
0x1p+32 | 0x1p+31 | 0x1.5p+5 | 0x0p+0
0x1.fffffep+30 | 0x1p+0 | 0x1.f4p+9 | 0x1.ff06ap+31
0x1.fffffcp+22 | 0x1.cp+30 | 0x1.ffffb2p+31 | 0x1.fffep+15
0x1p+31 | 0x1p+27 | 0x0p+0 | 0x1.5p+5
wcelfb
0x1p+32 | - | - | -
0x1.fffffep+30 | - | - | -
0x1.fffffcp+22 | - | - | -
0x1p+31 | - | - | -
vcfeb
16777215 | -16777215 | 42 | 10000
4 | 3 | 42 | 1
0 | 2147483647 | 0 | -2147483648
-2147483648 | -2147483648 | -2147483648 | -2147483648
wcfeb
16777215 | - | - | -
4 | - | - | -
0 | - | - | -
-2147483648 | - | - | -
vcefb
-0x1p+0 | 0x1p+31 | 0x1.5p+5 | 0x0p+0
0x1.fffffep+30 | 0x1p+0 | 0x1.f4p+9 | -0x1.f2bff8p+22
0x1.fffffcp+22 | 0x1.cp+30 | -0x1.388p+13 | 0x1.fffep+15
0x1p+31 | 0x1p+27 | 0x0p+0 | 0x1.5p+5
wcefb
-0x1p+0 | - | - | -
0x1.fffffep+30 | - | - | -
0x1.fffffcp+22 | - | - | -
0x1p+31 | - | - | -
vldeb
0x1.fffffep+23 | 0x1.54p+5
0x1p+2 | 0x1.54p+5
0x0p+0 | -0x0p+0
nan | nan
wldeb
0x1.fffffep+23 | -
0x1p+2 | -
0x0p+0 | -
nan | -
wflld
0x1.ffffffffffffep+51
0x1.999999999999ap-4
-0x0p+0
nan
vledb
0x1p+52 | - | -0x1.fffffep+23 | -
0x1.99999ap-4 | - | 0x1.8p+1 | -
-0x0p+0 | - | inf | -
nan | - | -nan | -
wledb
0x1p+52 | - | - | -
0x1.99999ap-4 | - | - | -
-0x0p+0 | - | - | -
nan | - | - | -
wflrx
0x1.fffffep+23 | -
0x1p+2 | -
inf | -
nan | -
vfisb
0x1.fffffep+23 | -0x1.fffffep+23 | 0x1.5p+5 | 0x1.388p+13
0x1p+2 | 0x1.8p+1 | 0x1.5p+5 | 0x1p+0
0x0p+0 | inf | -0x0p+0 | -inf
nan | -nan | nan | -nan
wfisb
0x1.fffffep+23 | - | - | -
0x1p+2 | - | - | -
0x0p+0 | - | - | -
nan | - | - | -
wfixb
0x1.fffffep+23
0x1p+2
inf
nan
vflcsb
-0x1.fffffep+23 | 0x1.fffffep+23 | -0x1.54p+5 | -0x1.388p+13
-0x1p+2 | -0x1.8p+1 | -0x1.54p+5 | -0x1p+0
-0x0p+0 | -inf | 0x0p+0 | inf
-nan | nan | -nan | nan
wflcsb
-0x1.fffffep+23 | - | - | -
-0x1p+2 | - | - | -
-0x0p+0 | - | - | -
-nan | - | - | -
wflcxb
-0x1.fffffep+23
-0x1p+2
-inf
-nan
vflnsb
-0x1.fffffep+23 | -0x1.fffffep+23 | -0x1.54p+5 | -0x1.388p+13
-0x1p+2 | -0x1.8p+1 | -0x1.54p+5 | -0x1p+0
-0x0p+0 | -inf | -0x0p+0 | -inf
-nan | -nan | -nan | -nan
wflnsb
-0x1.fffffep+23 | - | - | -
-0x1p+2 | - | - | -
-0x0p+0 | - | - | -
-nan | - | - | -
wflnxb
-0x1.fffffep+23
-0x1p+2
-inf
-nan
vflpsb
0x1.fffffep+23 | 0x1.fffffep+23 | 0x1.54p+5 | 0x1.388p+13
0x1p+2 | 0x1.8p+1 | 0x1.54p+5 | 0x1p+0
0x0p+0 | inf | 0x0p+0 | inf
nan | nan | nan | nan
wflpsb
0x1.fffffep+23 | - | - | -
0x1p+2 | - | - | -
0x0p+0 | - | - | -
nan | - | - | -
wflpxb
0x1.fffffep+23
0x1p+2
inf
nan
vfsqsb
0x1.fffffep+11 | nan | 0x1.a13a9cp+2 | 0x1.9p+6
0x1p+1 | 0x1.bb67aep+0 | 0x1.a13a9cp+2 | 0x1p+0
0x0p+0 | inf | -0x0p+0 | nan
nan | -nan | nan | -nan
wfsqsb
0x1.fffffep+11 | - | - | -
0x1p+1 | - | - | -
0x0p+0 | - | - | -
nan | - | - | -
wfsqxb
0x1.fffffeffffffbfffffdfffffecp+11
0x1p+1
inf
nan
vfssb
0x1.fffff6p+23 | -0x1.000002p+24 | 0x0p+0 | 0x1.3878p+13
-0x1.fffff6p+23 | 0x1.000002p+24 | 0x0p+0 | -0x1.3878p+13
0x1.fffffep+23 | -inf | 0x1.54p+5 | inf
nan | -nan | nan | -nan
wfssb
0x1.fffff6p+23 | - | - | -
-0x1.fffff6p+23 | - | - | -
0x1.fffffep+23 | - | - | -
nan | - | - | -
wfsxb
0x1.fffff6p+23
-0x1.fffff6p+23
-inf
nan
vfasb
0x1.000004p+24 | -0x1.fffff8p+23 | 0x1.54p+6 | 0x1.3888p+13
0x1.000004p+24 | -0x1.fffff8p+23 | 0x1.54p+6 | 0x1.3888p+13
0x1.fffffep+23 | inf | 0x1.54p+5 | -inf
nan | -nan | nan | -nan
wfasb
0x1.000004p+24 | - | - | -
0x1.000004p+24 | - | - | -
0x1.fffffep+23 | - | - | -
nan | - | - | -
wfaxb
0x1.000003p+24
0x1.000003p+24
inf
nan
vfdsb
0x1.fffffep+21 | -0x1.555554p+22 | 0x1p+0 | 0x1.388p+13
0x1.000002p-22 | -0x1.800002p-23 | 0x1p+0 | 0x1.a36e2ep-14
inf | -0x0p+0 | -inf | -0x0p+0
nan | -nan | nan | -nan
wfdsb
0x1.fffffep+21 | - | - | -
0x1.000002p-22 | - | - | -
inf | - | - | -
nan | - | - | -
wfdxb
0x1.fffffep+21
0x1.000001000001000001000001p-22
0x0p+0
nan
vfmsb
0x1.fffffep+25 | -0x1.7ffffep+25 | 0x1.c39p+10 | 0x1.388p+13
0x1.fffffep+25 | -0x1.7ffffep+25 | 0x1.c39p+10 | 0x1.388p+13
0x0p+0 | -inf | -0x0p+0 | -inf
nan | -nan | nan | -nan
wfmsb
0x1.fffffep+25 | - | - | -
0x1.fffffep+25 | - | - | -
0x0p+0 | - | - | -
nan | - | - | -
wfmxb
0x1.fffffep+25
0x1.fffffep+25
inf
nan
vfcesb
0 | 0 | -1 | 0
0 | 0 | -1 | 0
0 | 0 | 0 | 0
0 | 0 | 0 | 0
wfcesb
0 | - | - | -
0 | - | - | -
0 | - | - | -
0 | - | - | -
wfcexb
0
0
0
0
vfcesbs
0 | 0 | -1 | 0 cc=1
0 | 0 | -1 | 0 cc=1
0 | 0 | 0 | 0 cc=3
0 | 0 | 0 | 0 cc=3
wfcesbs
0 | - | - | - cc=3
0 | - | - | - cc=3
0 | - | - | - cc=3
0 | - | - | - cc=3
wfcexbs
0 cc=3
0 cc=3
0 cc=3
0 cc=3
vfchesb
-1 | 0 | -1 | -1
0 | -1 | -1 | 0
-1 | 0 | -1 | -1
0 | 0 | 0 | 0
wfchesb
-1 | - | - | -
0 | - | - | -
-1 | - | - | -
0 | - | - | -
wfchexb
-1
0
0
0
vfchesbs
-1 | 0 | -1 | -1 cc=1
0 | -1 | -1 | 0 cc=1
-1 | 0 | -1 | -1 cc=1
0 | 0 | 0 | 0 cc=3
wfchesbs
-1 | - | - | -
0 | - | - | - cc=3
-1 | - | - | -
0 | - | - | - cc=3
wfchexbs
-1
0 cc=3
0 cc=3
0 cc=3
vfminsb
0x1p+2 | -0x1.fffffep+23 | 0x1.54p+5 | 0x1p+0
0x1p+2 | -0x1.fffffep+23 | 0x1.54p+5 | 0x1p+0
0x0p+0 | -0x1.fffffep+23 | -0x0p+0 | -inf
-0x1.fffffcp+23 | 0x1.fffffcp+23 | -0x1.7p+4 | -0x1.3878p+13
wfminsb
0x1p+2 | - | - | -
0x1p+2 | - | - | -
0x0p+0 | - | - | -
-0x1.fffffcp+23 | - | - | -
wfminxb
0x1p+2
0x1p+2
0x1.fffffep+23
-0x1.7p+4
vfmaxsb
0x1.fffffep+23 | 0x1.8p+1 | 0x1.54p+5 | 0x1.388p+13
0x1.fffffep+23 | 0x1.8p+1 | 0x1.54p+5 | 0x1.388p+13
0x1.fffffep+23 | inf | 0x1.54p+5 | 0x1.388p+13
-0x1.fffffcp+23 | 0x1.fffffcp+23 | -0x1.7p+4 | -0x1.3878p+13
wfmaxsb
0x1.fffffep+23 | - | - | -
0x1.fffffep+23 | - | - | -
0x1.fffffep+23 | - | - | -
-0x1.fffffcp+23 | - | - | -
wfmaxxb
0x1.fffffep+23
0x1.fffffep+23
inf
-0x1.7p+4
vfchsb
-1 | 0 | 0 | -1
0 | -1 | 0 | 0
-1 | 0 | -1 | -1
0 | 0 | 0 | 0
wfchsb
-1 | - | - | -
0 | - | - | -
-1 | - | - | -
0 | - | - | -
wfchxb
-1
0
0
0
vfchsbs
-1 | 0 | 0 | -1 cc=1
0 | -1 | 0 | 0 cc=1
-1 | 0 | -1 | -1 cc=1
0 | 0 | 0 | 0 cc=3
wfchsbs
-1 | - | - | -
0 | - | - | - cc=3
-1 | - | - | -
0 | - | - | - cc=3
wfchxbs
-1
0 cc=3
0 cc=3
0 cc=3
vfmssb
0x1.fffffep+25 | -inf | 0x1.c39p+10 | inf
0x1.3ffffep+26 | -0x1.fffffep+25 | 0x1.c95p+10 | 0x1.387cp+14
wfmssb
0x1.fffffep+25 | - | - | -
0x1.3ffffep+26 | - | - | -
wfmsxb
-inf
0x1.000004cp+26
vfmasb
0x1.fffffep+25 | inf | 0x1.c39p+10 | -inf
0x1.8p+25 | -0x1p+25 | 0x1.bddp+10 | 0x1p+0
wfmasb
0x1.fffffep+25 | - | - | -
0x1.8p+25 | - | - | -
wfmaxb
inf
0x1.fffff28p+25
vfnmssb
-0x1.fffffep+25 | inf | -0x1.c39p+10 | -inf
-0x1.3ffffep+26 | 0x1.fffffep+25 | -0x1.c95p+10 | -0x1.387cp+14
wfnmssb
-0x1.fffffep+25 | - | - | -
-0x1.3ffffep+26 | - | - | -
wfnmsxb
inf
-0x1.000004cp+26
vfnmasb
-0x1.fffffep+25 | -inf | -0x1.c39p+10 | inf
-0x1.8p+25 | 0x1p+25 | -0x1.bddp+10 | -0x1p+0
wfnmasb
-0x1.fffffep+25 | - | - | -
-0x1.8p+25 | - | - | -
wfnmaxb
-inf
-0x1.fffff28p+25
wfcsb
cc=2
cc=1
cc=0
cc=3
wfcxb
cc=2
cc=1
cc=0
cc=3
vftcisb
0 | 0 | 0 | 0 cc=3
0 | 0 | 0 | 0 cc=3
-1 | -1 | 0 | 0 cc=1
0 | 0 | 0 | 0 cc=3
0 | -1 | 0 | -1 cc=1
wftcisb
0 | - | - | - cc=3
0 | - | - | - cc=3
0 | - | - | - cc=3
-1 | - | - | -
0 | - | - | - cc=3
wftcixb
-1
-1
0 cc=3
-1
0 cc=3

View File

@ -0,0 +1,2 @@
prog: vec2_float
prereq: test -e vec2_float && ../../../tests/s390x_features s390x-vx2

View File

@ -273,7 +273,7 @@ static int go(char *feature, char *cpu)
} else if (strcmp(feature, "s390x-mi3") == 0 ) {
match = facilities[0] & FAC_BIT(61);
} else if (strcmp(feature, "s390x-vx2") == 0 ) {
match = facilities[2] & FAC_BIT(20);
match = (GET_HWCAP() & 0x800) && (facilities[2] & FAC_BIT(20));
} else {
return 2; // Unrecognised feature.
}