CC-tea/org-hyperion-cules
1
0
Fork 0
mirror of https://github.com/SDL-Hercules-390/hyperion.git synced 2026-04-19 18:26:51 +02:00
Code Issues Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source 
git-svn-id: file:///home/jj/hercules.svn/trunk@518 956126f8-22a0-4046-8f4a-272fa8102e63
This commit is contained in:
Jan Jaeger
2001-12-10 14:06:59 +00:00
parent 9f1f4e77fb
commit 4ff21640a2
3 changed files with 13 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
stack.c
View File

@@ -1323,7 +1323,6 @@ LSED lsed; /* Linkage stack entry desc. */
VADR lsea; /* Linkage stack entry addr */
RADR abs; /* Absolute address */
int permode; /* 1=PER mode is set in PSW */
int saveilc; /* ILC across load_psw() */
U16 pkm; /* PSW key mask */
U16 sasn; /* Secondary ASN */
U16 eax; /* Extended AX */
@@ -1434,13 +1433,8 @@ VADR lsep; /* Virtual addr of entry desc.
/* Load new PSW using the bytes extracted from the stack entry */
/* The rc will be checked by calling routine for PIC 06 */
saveilc = regs->psw.ilc;
*rc = ARCH_DEP(load_psw) (regs, newpsw);
/* Restore the ILC if load_psw was successfull */
if(!rc)
regs->psw.ilc = saveilc;
/* Restore the PER mode bit from the current PSW */
if (permode)
regs->psw.sysmask |= PSW_PERMODE;