| /* |
| * Test early exception recognition using LPSWE. |
| * |
| * SPDX-License-Identifier: GPL-2.0-or-later |
| */ |
| .org 0x8d |
| ilc: |
| .org 0x8e |
| program_interruption_code: |
| .org 0x150 |
| program_old_psw: |
| .org 0x1D0 /* program new PSW */ |
| .quad 0,pgm |
| .org 0x200 /* lowcore padding */ |
| |
| .globl _start |
| _start: |
| lpswe bad_psw |
| j failure |
| |
| pgm: |
| chhsi program_interruption_code,0x6 /* specification exception? */ |
| jne failure |
| cli ilc,0 /* ilc zero? */ |
| jne failure |
| clc program_old_psw(16),bad_psw /* correct old PSW? */ |
| jne failure |
| lpswe success_psw |
| failure: |
| lpswe failure_psw |
| |
| .align 8 |
| bad_psw: |
| .quad 0x8000000000000000,0xfedcba9876543210 /* bit 0 set */ |
| success_psw: |
| .quad 0x2000000000000,0xfff /* see is_special_wait_psw() */ |
| failure_psw: |
| .quad 0x2000000000000,0 /* disabled wait */ |
