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

Add names for ITS machines on the internet.

Browse Source
This commit is contained in:
Lars Brinkhoff
2017-02-17 21:07:05 +01:00
committed by Eric Swenson
parent 0d22884941
commit 9f555fcb65
6 changed files with 32 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/sysen2/mldev.104 → src/sysen2/mldev.105
View File

@@ -84,7 +84,7 @@ GO: MOVE P,[-LPDLL-1,,PDL-1]
.VALUE
MOVE A,JBCDEV ;GET "DEVICE"
MOVEM A,RDEVN ;REMEMBER IT TO RETURN FOR .RCHST'S.
IRPS Y,,AI ML DM MC MX MD KL KS DB
IRPS Y,,AI ML DM MC MX MD KL KS DB ES NO SJ UP
CAMN A,[SIXBIT /X!Y/]
MOVE A,[SIXBIT /Y/] ;ALLOW "XAI", ETC., FOR EXPERIMENTAL VERSIONS OF "AI", ETC.
CAMN A,[SIXBIT /DIR!Y/]
@@ -94,7 +94,7 @@ TERMIN ;DEVICES SUCH AS "DIRML" ARE REALLY HANDLED AS "MLDIR".
;IMAGE AND ASCII DIRECTORIES.
MOVEM A,JBCDEV
LDB A,[301400,,JBCDEV] ;MIGHT BE DMAR1, ETC.
IRP X,,[DM,AI,ML,MC,MX,MD,KL,KS,DB]
IRP X,,[DM,AI,ML,MC,MX,MD,KL,KS,DB,ES,NO,SJ,UP]
CAIN A,(SIXBIT / X/) ;**** IF ANY NON 2-CHAR HOST NAME EVER EXISTS,
JRST GOTHST ;THIS BARFUCIOUS KLUDGE WILL HAVE TO BE FIXED UP.
TERMIN

10
src/syseng/@dev.55 → src/syseng/@dev.56
View File

@@ -65,6 +65,11 @@ devtab:
defdev AI,devml ; Note that these are all two characters
defdev MD,devml ; long!
defdev ML,devml
defdev DB,devml
defdev ES,devml
defdev NO,devml
defdev SJ,devml
defdev UP,devml
defdev DM,devrip ; Never again...
defdev KL,devrip
defdev MX,devrip
@@ -81,6 +86,11 @@ nffs==:.cnt. ; # foreign filesystems
defdev DIRAI,devml
defdev DIRMD,devml
defdev DIRML,devml
defdev DIRDB,devml
defdev DIRES,devml
defdev DIRNO,devml
defdev DIRSJ,devml
defdev DIRUP,devml
defdev DIRDM,devrip ; Never more
defdev DIRKL,devrip
defdev DIRMX,devrip