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

a setl instruction was changed to a setd

Browse source 
setl was just plain wrong
This commit is contained in:
sater 1984-07-19 13:09:53 +00:00
parent d5aa088876
commit d082a2b0a2
11 changed files with 11 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -9,5 +9,5 @@ adf~:
movf (sp)+,r0 movf (sp)+,r0
addf (sp)+,r0 addf (sp)+,r0
movf r0,-(sp) movf r0,-(sp)
setl setd
jmp (r1) jmp (r1)

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

@ -10,5 +10,5 @@ cff~:
jsr pc,setfloat~ jsr pc,setfloat~
movof (sp)+,r0 movof (sp)+,r0
movf r0,-(sp) movf r0,-(sp)
setl setd
1: jmp (r1) 1: jmp (r1)

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

@ -10,5 +10,5 @@ cfi~:
jsr pc,setfloat~ jsr pc,setfloat~
movf (sp)+,r0 movf (sp)+,r0
movfi r0,-(sp) movfi r0,-(sp)
setl;seti setd;seti
jmp (r1) jmp (r1)

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

@ -10,7 +10,7 @@ cif~:
1: jsr pc,setint~ 1: jsr pc,setint~
movif (sp)+,r0 movif (sp)+,r0
movf r0,-(sp) movf r0,-(sp)
setl;seti setd;seti
jmp (r1) jmp (r1)
cuf~: cuf~:
mov (sp)+,r1 mov (sp)+,r1

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

@ -9,7 +9,7 @@ cmf~:
movf (sp)+,r1 movf (sp)+,r1
clr r0 clr r0
cmpf r0,r1 cmpf r0,r1
setl setd
cfcc cfcc
beq 1f beq 1f
blt 2f blt 2f

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

@ -9,5 +9,5 @@ dvf~:
movf (sp)+,r1 movf (sp)+,r1
divf r0,r1 divf r0,r1
movf r1,-(sp) movf r1,-(sp)
setl setd
jmp (r1) jmp (r1)

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

@ -9,5 +9,5 @@ fef~:
movei r0,-(sp) movei r0,-(sp)
movie $0,r0 movie $0,r0
movf r0,02(sp) movf r0,02(sp)
setl setd
jmp (r1) jmp (r1)

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

@ -9,5 +9,5 @@ fif~:
modf (sp)+,r0 modf (sp)+,r0
movf r0,-(sp) movf r0,-(sp)
movf r1,-(sp) movf r1,-(sp)
setl setd
jmp (r1) jmp (r1)

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

@ -8,5 +8,5 @@ mlf~:
movf (sp)+,r0 movf (sp)+,r0
mulf (sp)+,r0 mulf (sp)+,r0
movf r0,-(sp) movf r0,-(sp)
setl setd
jmp (r1) jmp (r1)

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

@ -6,5 +6,5 @@ ngf~:
mov (sp)+,r1 mov (sp)+,r1
jsr pc,setfloat~ jsr pc,setfloat~
negf (sp) negf (sp)
setl setd
jmp (r1) jmp (r1)

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

@ -9,5 +9,5 @@ sbf~:
subf (sp)+,r0 subf (sp)+,r0
negf r0 negf r0
movf r0,-(sp) movf r0,-(sp)
setl setd
jmp (r1) jmp (r1)