godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added `movl r3,ap' to restore the argument pointer before returning

Browse Source 
vi jmp (r0).
This commit is contained in:
em 1985-01-22 13:10:35 +00:00
parent 1555d8948e
commit c6d9ab97ec
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
mach/vax4/libem/mon.s
View File

@ -75,6 +75,7 @@ Lgetpid:
Lr0:
jsb Lsyscall
pushl r0
movl r3,ap
jmp (r2)
Lgetuid:
Lgetgid:
@ -83,6 +84,7 @@ Lr0r1:
jsb Lsyscall
pushl r0
pushl r1
movl r3,ap
jmp (r2)
Lpipe:
Lwait:
@ -93,6 +95,7 @@ Ler0r1:
pushl r0
pushl r1
clrl -(sp)
movl r3,ap
jmp (r2)
# 1 argument.
@ -118,6 +121,7 @@ Lchroot:
Le:
jsb Lsyscall
clrl -(sp)
movl r3,ap
jmp (r2)
Lalarm:
Lumask:
@ -144,6 +148,7 @@ Ler0:
jsb Lsyscall
pushl r0
clrl -(sp)
movl r3,ap
jmp (r2)
# 3 arguments.
@ -211,6 +216,7 @@ Lsyscall:
bcc L1
cvtwl r0,(sp) # Push the error returned twice,
cvtwl r0,-(sp) # overwrite the return address
movl r3,ap
jmp (r2)
L1:
rsb
@ -261,16 +267,20 @@ sys:
bcc L4
movl (sp),sigtrp0 [r1] # Error, reset old trap number.
pushl r0
movl r3,ap
jmp (r2)
L4: clrl -(sp)
movl r3,ap
jmp (r2)
badsig:
movl $-1,(sp)
pushl (sp)
movl r3,ap
jmp (r2)
badtrp:
movl sigtrp0 [r1],(sp)
pushl $-1
movl r3,ap
jmp (r2)
sigs: