diff --git a/pages/e01-07 b/pages/e01-07 index 5039e39..53d2969 100644 --- a/pages/e01-07 +++ b/pages/e01-07 @@ -17,11 +17,11 @@ sysopen: jsr r0,arg2 / get sys args into u.namep and on stack jsr r0,namei / i-number of file in r1 br error2 / file not found - tst (sp) / is mode = 0 (2nd arg of call, 0 means, open for read) + tst (sp) / is mode = 0 (2nd arg of call; 0 means, open for read) beq 1f / yes, leave i-number positive neg r1 / open for writing so make i-number negative 1: - jsr r0,iopen / ooen file whose i-number is in r1 + jsr r0,iopen / open file whose i-number is in r1 tst (sp)+ / pop the stack and test the mode beq op1 / is open for read op1 @@ -44,7 +44,7 @@ op1: cmp r3,$[nfiles*8.] / done scanning blt 1b / no, back br error2 / yes, error -1: / r2 has index to u.fp list, r3, has index to fsp table +1: / r2 has index to u.fp list; r3, has index to fsp table mov r1,fsp(r3) / put i-number of open file into next available mov cdev,fsp+2(r3) / entry in fsp table, put # of device in / next word diff --git a/pages/e01-08 b/pages/e01-08 index b1b35bc..41f4e42 100644 --- a/pages/e01-08 +++ b/pages/e01-08 @@ -8,7 +8,7 @@ error2: sysret2: jmp sysret / see 'sysret' routine -syscreat: / name, mode +syscreat: / name; mode jsr r0,arg2 / put file name in u.namep put mode on stack jsr r0,namei / get the i-number br 2f / if file doesn't exist 2f @@ -24,7 +24,7 @@ syscreat: / name, mode mov u.dirbuf,r1 / put i-number for this new file in r1 br op0 / open the file -sysmkdir: / make a directopy +sysmkdir: / make a directory jsr r0,arg2 / point u.namep to the file name jsr r0,namei / get the i-number br .+4 / if file not found branch around error @@ -38,7 +38,7 @@ sysmkdir: / make a directopy br sysret2 / sysclose: / close the file - mov *u.r0,r1 / move index to u.fu list into r1 + mov *u.r0,r1 / move index to u.fp list into r1 jsr r0,fclose / close the file br error2 / unknown file descriptor br sysret2 @@ -46,8 +46,8 @@ sysclose: / close the file sysemt: jsr r0,arg; 30 / put the argument of the sysemt call in loc 30 cmp 30,$core / was the argument a lower address than core - blo 1f / yes, rtssvm - cmp 30,$ecore / no, was it higher than core and less than + blo 1f / yes, rtssym + cmp 30,$ecore / no, was it higher than "core" and less than / "ecore" blo 2f / yes, sysret2 1: diff --git a/pages/e01-09 b/pages/e01-09 index 4bcee35..ca14779 100644 --- a/pages/e01-09 +++ b/pages/e01-09 @@ -26,7 +26,7 @@ sysmdate: / change the modification time of a file mov 2(sp),i.mtim+2 / modification time br sysret2 -sysstty: / set mode of typewriter, 3 consequtive word arguments +sysstty: / set mode of typewriter; 3 consequtive word arguments jsr r0,gtty / r1 will have offset to tty block, r2 has source mov r2,-(sp) mov r1,-(sp) / put r1 and r2 on the stack @@ -43,7 +43,7 @@ sysstty: / set mode of typewriter, 3 consequtive word arguments beq 1f / yes, no characters to output mov r1,0f / no, put offset in sleep arg jsr r0,sleep; 0:.. / put tty output process to sleep - br 1b / trv to calm it down again + br 1b / try to calm it down again 1: mov (sp)+,r1 mov (sp)+,r2 / restore registers diff --git a/pages/e01-10 b/pages/e01-10 index 34ff917..cb149a4 100644 --- a/pages/e01-10 +++ b/pages/e01-10 @@ -4,7 +4,7 @@ mov (r2)+,tty+4(r1) / move to flag byte of tty block jmp sysret2 / return to user -sysgtty: / get status of typewriter, 3 consequtive word arguments +sysgtty: / get status of typewriter; 3 consequtive word arguments jsr r0,gtty / r1 will have offset to tty block, r2 has / destination mov rcsr(r1),(r2)+ / put reader control status in 1st word