Message ID | 1380007671-18976-2-git-send-email-borntraeger@de.ibm.com |
---|---|
State | New |
Headers | show |
diff --git a/target-s390x/kvm.c b/target-s390x/kvm.c index 4923e0a..0bc317e 100644 --- a/target-s390x/kvm.c +++ b/target-s390x/kvm.c @@ -439,6 +439,10 @@ static int kvm_sclp_service_call(S390CPU *cpu, struct kvm_run *run, int r = 0; cpu_synchronize_state(CPU(cpu)); + if (env->psw.mask & PSW_MASK_PSTATE) { + enter_pgmcheck(cpu, PGM_PRIVILEGED); + return 0; + } sccb = env->regs[ipbh0 & 0xf]; code = env->regs[(ipbh0 & 0xf0) >> 4];