github.com/DoctorWkt.pdp7-unix
1
0
Fork 0
mirror of https://github.com/DoctorWkt/pdp7-unix.git synced 2026-05-03 14:48:42 +00:00
Code Issues Releases Wiki Activity

I found the type in cat.s and now original PDP-7 cat works with a7out! Yay!

Browse Source
This commit is contained in:
Warren Toomey
2016-03-01 17:58:01 +10:00
parent e0557be899
commit cd60f962c0
1 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
src/cmd/cat.s
View File

@@ -63,14 +63,14 @@ done:
and d1 and d1
sna cla sna cla
jmp 1f jmp 1f
jms putc " Print out the character jms putc " Store the character in the buffer
jmp done " and loop back jmp done " and loop back
1: 1:
lac noc lac noc " Get the number of characters in the buffer
rcr rcr " Divide by two to convert to words
dac 1f dac 1f " Save in the write's word count below
lac fo " Load fd 1, stdout lac fo " Load fd 1, stdout
sys write; iopt+1; 1 sys write; iopt+1; 1:.. " Write the leftover buffer and exit
sys exit sys exit
getc: 0 getc: 0