Re: [PATCH 2/2] tests/tcg/s390x: Test MXDB and MXDBR

[David Hildenbrand <david@redhat.com>]

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>

-- 
Thanks,

David / dhildenb