aboutsummaryrefslogtreecommitdiff
path: root/tests/tcg/s390x/icm.S
blob: d24d1f52fb833dc4c3a62518ab1b52a519566acd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
    .org 0x8e
program_interruption_code:
    .org 0x1d0                         /* program new PSW */
    .quad 0,pgm
    .org 0x200                         /* lowcore padding */
    .globl _start
_start:
    lgrl %r0,op1
    icm %r0,10,op2
    cg %r0,exp
    jne failure
    lgrl %r1,bad_addr
    icm %r0,0,0(%r1)
failure:
    lpswe failure_psw
pgm:
    chhsi program_interruption_code,5  /* addressing exception? */
    jne failure
    lpswe success_psw
    .align 8
op1:
    .quad 0x1234567887654321
op2:
    .quad 0x0011223344556677
exp:
    .quad 0x1234567800651121
bad_addr:
    .quad 0xffffffff00000000
success_psw:
    .quad 0x2000000000000,0xfff        /* see is_special_wait_psw() */
failure_psw:
    .quad 0x2000000000000,0            /* disabled wait */