Add original unix v6
This commit is contained in:
@@ -0,0 +1,23 @@
|
||||
/
|
||||
/
|
||||
|
||||
/ fxf -- format statements
|
||||
|
||||
.globl sform
|
||||
.globl sdata
|
||||
|
||||
.globl ptemp
|
||||
.globl error
|
||||
|
||||
sform:
|
||||
cmp progt,$6 / block data
|
||||
bne 1f
|
||||
jsr r5,error; 50.
|
||||
1:
|
||||
jsr r5,ptemp; 'f; efno; line
|
||||
rts r5
|
||||
|
||||
sdata:
|
||||
jsr r5,ptemp; 'd; efno; line
|
||||
rts r5
|
||||
|
||||
Reference in New Issue
Block a user