Initial revision
This commit is contained in:
12
mach/vax4/libem/com.s
Normal file
12
mach/vax4/libem/com.s
Normal file
@@ -0,0 +1,12 @@
|
||||
# $Header$
|
||||
.globl .com
|
||||
|
||||
# bytes in r0
|
||||
.com:
|
||||
movl (sp)+,r2
|
||||
movl sp,r1
|
||||
ashl $-2,r0,r0
|
||||
L1:
|
||||
mcoml (r1),(r1)+
|
||||
sobgtr r0,L1
|
||||
jmp (r2)
|
||||
Reference in New Issue
Block a user