| Message ID | 20230601223027.795501-3-iii@linux.ibm.com (mailing list archive) |
|---|---|
| State | New, archived |
| Headers | show |
| Series | target/s390x: Fix MXDB and MXDBR | expand |
On 02.06.23 00:30, Ilya Leoshkevich wrote: > Add a small test to prevent regressions. > > Cc: qemu-stable@nongnu.org > Signed-off-by: Ilya Leoshkevich <iii@linux.ibm.com> > --- > tests/tcg/s390x/Makefile.target | 1 + > tests/tcg/s390x/mxdb.c | 30 ++++++++++++++++++++++++++++++ > 2 files changed, 31 insertions(+) > create mode 100644 tests/tcg/s390x/mxdb.c > > diff --git a/tests/tcg/s390x/Makefile.target b/tests/tcg/s390x/Makefile.target > index 3c239fdd082..d33960caa0a 100644 > --- a/tests/tcg/s390x/Makefile.target > +++ b/tests/tcg/s390x/Makefile.target > @@ -35,6 +35,7 @@ TESTS+=chrl > TESTS+=rxsbg > TESTS+=ex-relative-long > TESTS+=ex-branch > +TESTS+=mxdb > > cdsg: CFLAGS+=-pthread > cdsg: LDFLAGS+=-pthread > diff --git a/tests/tcg/s390x/mxdb.c b/tests/tcg/s390x/mxdb.c > new file mode 100644 > index 00000000000..ae922559d3d > --- /dev/null > +++ b/tests/tcg/s390x/mxdb.c > @@ -0,0 +1,30 @@ > +/* > + * Test the MXDB and MXDBR instructions. > + * > + * SPDX-License-Identifier: GPL-2.0-or-later > + */ > +#include <assert.h> > +#include <stdlib.h> > + > +int main(void) > +{ > + union { > + double d[2]; > + long double ld; > + } a; > + double b; > + > + a.d[0] = 1.2345; > + a.d[1] = 999; > + b = 6.789; > + asm("mxdb %[a],%[b]" : [a] "+f" (a.ld) : [b] "R" (b)); > + assert(a.ld > 8.38 && a.ld < 8.39); > + > + a.d[0] = 1.2345; > + a.d[1] = 999; > + b = 6.789; > + asm("mxdbr %[a],%[b]" : [a] "+f" (a.ld) : [b] "f" (b)); > + assert(a.ld > 8.38 && a.ld < 8.39); > + > + return EXIT_SUCCESS; > +} Acked-by: David Hildenbrand <david@redhat.com>
diff --git a/tests/tcg/s390x/Makefile.target b/tests/tcg/s390x/Makefile.target index 3c239fdd082..d33960caa0a 100644 --- a/tests/tcg/s390x/Makefile.target +++ b/tests/tcg/s390x/Makefile.target @@ -35,6 +35,7 @@ TESTS+=chrl TESTS+=rxsbg TESTS+=ex-relative-long TESTS+=ex-branch +TESTS+=mxdb cdsg: CFLAGS+=-pthread cdsg: LDFLAGS+=-pthread diff --git a/tests/tcg/s390x/mxdb.c b/tests/tcg/s390x/mxdb.c new file mode 100644 index 00000000000..ae922559d3d --- /dev/null +++ b/tests/tcg/s390x/mxdb.c @@ -0,0 +1,30 @@ +/* + * Test the MXDB and MXDBR instructions. + * + * SPDX-License-Identifier: GPL-2.0-or-later + */ +#include <assert.h> +#include <stdlib.h> + +int main(void) +{ + union { + double d[2]; + long double ld; + } a; + double b; + + a.d[0] = 1.2345; + a.d[1] = 999; + b = 6.789; + asm("mxdb %[a],%[b]" : [a] "+f" (a.ld) : [b] "R" (b)); + assert(a.ld > 8.38 && a.ld < 8.39); + + a.d[0] = 1.2345; + a.d[1] = 999; + b = 6.789; + asm("mxdbr %[a],%[b]" : [a] "+f" (a.ld) : [b] "f" (b)); + assert(a.ld > 8.38 && a.ld < 8.39); + + return EXIT_SUCCESS; +}
Add a small test to prevent regressions. Cc: qemu-stable@nongnu.org Signed-off-by: Ilya Leoshkevich <iii@linux.ibm.com> --- tests/tcg/s390x/Makefile.target | 1 + tests/tcg/s390x/mxdb.c | 30 ++++++++++++++++++++++++++++++ 2 files changed, 31 insertions(+) create mode 100644 tests/tcg/s390x/mxdb.c