1 .org 0x8e 2program_interruption_code: 3 .org 0x1d0 /* program new PSW */ 4 .quad 0,pgm 5 .org 0x200 /* lowcore padding */ 6 .globl _start 7_start: 8 lgrl %r0,op1 9 clm %r0,6,op2 10 jle failure 11 lgrl %r1,bad_addr 12 clm %r0,0,0(%r1) 13failure: 14 lpswe failure_psw 15pgm: 16 chhsi program_interruption_code,5 /* addressing exception? */ 17 jne failure 18 lpswe success_psw 19 .align 8 20op1: 21 .quad 0x1234567887654321 22op2: 23 .quad 0x3456789abcdef012 24bad_addr: 25 .quad 0xffffffff00000000 26success_psw: 27 .quad 0x2000000000000,0xfff /* see is_special_wait_psw() */ 28failure_psw: 29 .quad 0x2000000000000,0 /* disabled wait */ 30