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

Merge branch 'master' of https://github.com/DoctorWkt/pdp7-unix

Browse Source
This commit is contained in:
Warren Toomey
2016-03-24 08:41:16 +10:00
parent 7599646c78 36f09f2519
commit 023f80a6eb
1 changed files with 8 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/other/pblsd.s
+8 -7
View File
@@ -19,10 +19,10 @@ main:
lac nextarg i " fetch it lac nextarg i " fetch it
dac longopt " save (for long check) dac longopt " save (for long check)
-4 " check for second arg lac argc
tad argc sad d8
spa skp
jmp nodir " no second arg jmp usage " no second arg
lac nextarg lac nextarg
tad d3 " skip rest of argv[0] tad d3 " skip rest of argv[0]
@@ -199,8 +199,8 @@ octal: 0
isz octal " skip the oits argument isz octal " skip the oits argument
jmp octal i " and return jmp octal i " and return
nodir: usage:
lac d1; sys write; nodirs; 5 lac d1; sys write; usages; lusage
sys exit sys exit
error: error:
@@ -212,8 +212,9 @@ error:
" constants " constants
nodirs: <di>; <r 040; <na>; <me> usages: <di>; <r 040; <na>; <me> " also writes next word!!
qnl: <? 012 qnl: <? 012
lusage=.-usages
" file type bits, each followed by character to tag with " file type bits, each followed by character to tag with
types: types: