some more changes to use VAX assembler
This commit is contained in:
@@ -1,28 +1,29 @@
|
||||
#include "em_abs.h"
|
||||
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
|
||||
.define .fef
|
||||
|
||||
# $Header$
|
||||
! $Header$
|
||||
|
||||
.globl .fef
|
||||
|
||||
.fef:
|
||||
movl (sp)+,r3
|
||||
cmpl r0,$4
|
||||
bneq L1
|
||||
bneq I1
|
||||
movf (sp)+,r0
|
||||
jsb Lhulp
|
||||
jsb Ihulp
|
||||
movf r0,-(sp)
|
||||
jmp (r3)
|
||||
L1:
|
||||
I1:
|
||||
cmpl r0,$8
|
||||
bneq L2
|
||||
bneq I2
|
||||
movd (sp)+,r0
|
||||
jsb Lhulp
|
||||
jsb Ihulp
|
||||
movd r0,-(sp)
|
||||
jmp (r3)
|
||||
L2:
|
||||
I2:
|
||||
pushl $EILLINS
|
||||
jmp .fat
|
||||
Lhulp:
|
||||
Ihulp:
|
||||
extzv $7,$8,r0,r2
|
||||
subl3 $128,r2,-(sp)
|
||||
insv $128,$7,$8,r0
|
||||
|
||||
Reference in New Issue
Block a user