d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fixes

Browse source
This commit is contained in:
ceriel 1991-09-19 14:39:10 +00:00
parent b281e4c6b5
commit be3c10d635
3 changed files with 9 additions and 6 deletions
mach/pdp/libem
printf.sstrhp.strp.s

2
mach/pdp/libem/printf.s
View file

@ -54,7 +54,7 @@ ready:
mov r4,-(sp) mov r4,-(sp)
mov $buff,-(sp) mov $buff,-(sp)
mov $01,-(sp) mov $01,-(sp)
jsr __write jsr pc,__write
add $06,sp add $06,sp
mov (sp)+,r4 mov (sp)+,r4
mov (sp)+,r3 mov (sp)+,r3

7
mach/pdp/libem/strhp.s
View file

@ -11,12 +11,13 @@ strhp~:
mov (sp)+,r1 mov (sp)+,r1
mov r0,-(sp) mov r0,-(sp)
mov r1,reghp~ mov r1,reghp~
cmp r1,2f+2 cmp r1,2f
blos 1f blos 1f
add $01777,r1 add $01777,r1
bic $01777,r1 bic $01777,r1
mov r1,-(sp) mov r1,-(sp)
jsr __brk mov r1,2f
jsr pc,__brk
tst (sp)+ tst (sp)+
tst r0 tst r0
blt 3f blt 3f
@ -24,3 +25,5 @@ strhp~:
3: mov $EHEAP,-(sp) 3: mov $EHEAP,-(sp)
jsr pc,trp~ jsr pc,trp~
rts pc rts pc
.sect .data
2: .data2 0

6
mach/pdp/libem/trp.s
View file

@ -6,7 +6,7 @@
fat~: fat~:
jsr pc,trp~ jsr pc,trp~
jsr __exit jsr pc,__exit
trp~: trp~:
mov r0,-(sp) mov r0,-(sp)
@ -88,9 +88,9 @@ trp~:
mov $013,-(sp) mov $013,-(sp)
mov $buf,-(sp) mov $buf,-(sp)
mov $2,-(sp) mov $2,-(sp)
jsr __write jsr pc,__write
add $6,sp add $6,sp
jsr __exit jsr pc,__exit
.sect .data .sect .data
retar: .space 16 retar: .space 16
retend: retend: