1
0
mirror of https://github.com/PDP-10/its.git synced 2026-02-04 07:43:02 +00:00

Increase NAMDRG buffer size for TTYTYP.

This commit is contained in:
Lars Brinkhoff
2019-01-03 11:35:55 +01:00
parent 80726fc72c
commit bd987a416d

View File

@@ -90,6 +90,8 @@ mapmsk==574377776000 ;$<mapmsk>t; in ddt types out 10-11 interface map entry
ifndef maxtty,maxtty==100 ;max # tty's we can handle.
ifndef nontty,nontty==40 ;max # lisp machines
ifndef ttysiz,ttysiz=5000 ;max size of TTYTYP.
loc 41
pushj p,uuoh
@@ -1537,7 +1539,7 @@ gttys: .call [ setz
[sixbit />/]
setz ['syseng]]
jsr die
move c,[-5000,,ttyfil]
move c,[-5*ttysiz,,ttyfil]
.iot dkic,c
skipl c
jsr die ;syseng;ttytyp is too big!
@@ -2131,7 +2133,7 @@ chsstm: block 10 ;time transaction started
sptr: 0 ;byte ptr into output buffer
screen: block 95.*37./5+1 ;space for output to be stored till block IOT
ttyfil: block 1000
ttyfil: block ttysiz
pictur: block 455.*18. ;area reserved for picture
constants