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

Set allocation for newly created directory.

Browse Source 
When a new directory is created, its QSALLO needs to be set.  Failing
to do so will result in a random value, which will confuse the code to
select a dick pack for new files.  Setting to -1 means the directory
has no allocation, so files can be created on any pack.
This commit is contained in:
Lars Brinkhoff 2023-01-14 22:19:15 +01:00
parent 16210cb40b
commit c0bebff532
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/system/disk.1226 → src/system/disk.1227
View File

@ -1087,6 +1087,7 @@ QSKONE: PUSHJ P,QFLDF ;FIND FREE DIR SLOT
PUSHJ P,UDELAY ;HOPEFULLY MEMORY WILL APPEAR SHORTLY
JRST QSKONE]
MOVEM C,QSNUD(H)
IFN QRSRVP,SETOM QSALLO(H) ;NEW DIR HAS NO ALLOCATION
SOS NQFUS ;NO TIMING ERR DUE TO QSKOSW
MOVEI J,MU23UD
DPB J,[MUR,,MEMBLT(A)]