xref: /openbmc/qemu/tests/tcg/s390x/lra.S (revision 8d309a3a97e2d3734b74b07f355f860a9f2e880e)
1*028dc70eSIlya Leoshkevich    .org 0x200                         /* lowcore padding */
2*028dc70eSIlya Leoshkevich    .globl _start
3*028dc70eSIlya Leoshkevich_start:
4*028dc70eSIlya Leoshkevich    lgrl %r1,initial_r1
5*028dc70eSIlya Leoshkevich    lra %r1,0(%r1)
6*028dc70eSIlya Leoshkevich    cgrl %r1,expected_r1
7*028dc70eSIlya Leoshkevich    jne 1f
8*028dc70eSIlya Leoshkevich    lpswe success_psw
9*028dc70eSIlya Leoshkevich1:
10*028dc70eSIlya Leoshkevich    lpswe failure_psw
11*028dc70eSIlya Leoshkevich    .align 8
12*028dc70eSIlya Leoshkevichinitial_r1:
13*028dc70eSIlya Leoshkevich    .quad 0x8765432112345678
14*028dc70eSIlya Leoshkevichexpected_r1:
15*028dc70eSIlya Leoshkevich    .quad 0x8765432180000038           /* ASCE type exception */
16*028dc70eSIlya Leoshkevichsuccess_psw:
17*028dc70eSIlya Leoshkevich    .quad 0x2000000000000,0xfff        /* see is_special_wait_psw() */
18*028dc70eSIlya Leoshkevichfailure_psw:
19*028dc70eSIlya Leoshkevich    .quad 0x2000000000000,0            /* disabled wait */
20