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:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user