github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-01-24 03:18:05 +00:00
Code Issues Releases Wiki Activity

Avoid collision with .FATAL, DMOVE and DMOVEM.

Browse Source 
Newer MIDAS defines all of these itself; Muddle wants its own
definitions.
This commit is contained in:
Adam Sampson 2018-04-23 16:10:04 +01:00 committed by Adam Sampson
parent d88315865a
commit 5a75505e8b
2 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/mudsys/initm.373 → src/mudsys/initm.374
View File

@ -12,6 +12,7 @@ SYSQ
XBLT==123000,,
GCHN==0
IFE ITS,[
EXPUNGE .FATAL
FATINS==.FATAL"
SEVEC==104000,,204
.INSRT STENEX >

8
src/mudsys/uuoh.184
View File

@ -26,9 +26,11 @@ G==F+1
UUOTBL: ILLUUO
EXPUNG .FATAL
IRP UUOS,,[[DP,DODP],[.MCALL,DMCALL],[.ACALL,DACALL],[.ECALL,DECALL],[.SAVAC,DSAVAC]
[.FATAL,DFATAL],[.ERRUU,DOERR],[.POPUN,DPOPUN],[.LSAVA,DLSAVA]
[SHRRM,DHRRM],[SHRLM,DHRLM],[SXBLT,DXBLT],[SMOVEM,DMOVEM],[SHLRZ,DHLRZ],[SSETZM,DSETZM],[SMOVE,DMOVE]]
[SHRRM,DHRRM],[SHRLM,DHRLM],[SXBLT,DXBLT],[SMOVEM,DMOVMX],[SHLRZ,DHLRZ],[SSETZM,DSETZM],[SMOVE,DMOVEX]]
UUFOO==.IRPCNT+1
IRP UUO,DISP,[UUOS]
.GLOBAL UUO
@ -1055,13 +1057,13 @@ DPOPUN: PUSHJ P,POPUNW
; HERE FOR MULTI SEG SIMULATION STUFF
DMOVE: MOVSI C,(MOVE)
DMOVEX: MOVSI C,(MOVE)
JRST MEX
DHRRM: MOVSI C,(HRRM)
JRST MEX
DHRLM: MOVSI C,(HRLM)
JRST MEX
DMOVEM: MOVSI C,(MOVEM)
DMOVMX: MOVSI C,(MOVEM)
JRST MEX
DHLRZ: MOVSI C,(HLRZ)
JRST MEX