glm94/pdp7-unix
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

system comments

Browse Source
This commit is contained in:
Phil Budne
2016-03-15 20:48:42 -04:00
parent bb0a7084b3
commit fe48c8cdc8
2 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/sys/s2.s
+5 -5
View File
@@ -268,7 +268,7 @@ open1: " common exit for open/creat
"** 01-s1.pdf page 11 "** 01-s1.pdf page 11
.close: .close:
jms finac " get fnode (open file) jms finac " get fnode (open file) for fd in user AC
dzm f.flags " clear flags dzm f.flags " clear flags
jms fput " write fnode back to u.ofiles jms fput " write fnode back to u.ofiles
jmp sysexit jmp sysexit
@@ -328,16 +328,16 @@ open1: " common exit for open/creat
jms finac " get fnode with fd from user AC jms finac " get fnode with fd from user AC
lac f.flags " get open file table flags lac f.flags " get open file table flags
and d1 " open for write? and d1 " open for write?
sna " yes, skip sna " if yes, skip
jms error " no: error jms error " no: error
lac i.flags " get inode flags lac i.flags " get inode flags
and o40 " get special bit? and o40 " get device bit
"** 01-s1.pdf page 12 "** 01-s1.pdf page 12
sna " special? sna " special?
jmp 1f " no jmp 1f " no
iof " special file (device node) iof " yes, special: turn interrupts off
lac ii " get i number lac ii " get i number
tad sww " get write routine tad sww " get write routine entry addr
dac .+1 dac .+1
jmp .. i " dispatch to write routine jmp .. i " dispatch to write routine
1: " here with regular file 1: " here with regular file
src/sys/s3.s
+2 -2
View File
@@ -122,8 +122,8 @@ badcal: " bad (unimplemented) system call
" MQ/ message " MQ/ message
.rmes: .rmes:
jms awake jms awake
lac o100000 " mark this process to "not ready" lac o100000 " mark this process "not ready"
tad u.ulistp i tad u.ulistp i " by incrementing status
dac u.ulistp i dac u.ulistp i
law 2 law 2
tad u.ulistp tad u.ulistp