* gasp/crash1.out, gasp/macro.out, gasp/sfunc.out: Complete
truncated files, so that the tests pass.
This commit is contained in:
parent
55243738ff
commit
0247c1c073
|
@ -1,5 +1,8 @@
|
|||
Mon Aug 7 22:39:28 1995 Ian Lance Taylor <ian@cygnus.com>
|
||||
|
||||
* gasp/crash1.out, gasp/macro.out, gasp/sfunc.out: Complete
|
||||
truncated files, so that the tests pass.
|
||||
|
||||
* gas/mri/mri.exp: Add setup_xfail for hppa*-*-* for equ,
|
||||
constants, and expr.
|
||||
|
||||
|
|
|
@ -0,0 +1,24 @@
|
|||
!
|
||||
|
||||
!
|
||||
|
||||
! .MACRO foo a b c=a
|
||||
! \a \b \c \d
|
||||
! .ENDM
|
||||
!
|
||||
|
||||
! foo 1 2
|
||||
! 1 2 a \d
|
||||
1 2 a \d
|
||||
! foo 1 2 3 4
|
||||
! foo 1
|
||||
! 1 a \d
|
||||
1 a \d
|
||||
! foo
|
||||
! a \d
|
||||
a \d
|
||||
!
|
||||
|
||||
!
|
||||
|
||||
! .END
|
|
@ -172,4 +172,199 @@
|
|||
! PLUS1 R,R1
|
||||
! ADD #1,R1
|
||||
ADD #1,R1
|
||||
! .SDATA "R1
|
||||
! .SDATA "R1"
|
||||
.byte 82,49
|
||||
!
|
||||
|
||||
! .MACRO SUM P1
|
||||
! MOV R0,R10
|
||||
! ADD R1,R10
|
||||
! ADD R2,R10
|
||||
! \P1
|
||||
! ADD R3,R10
|
||||
! .ENDM
|
||||
!
|
||||
|
||||
! SUM .EXITM
|
||||
! MOV R0,R10
|
||||
MOV R0,R10
|
||||
! ADD R1,R10
|
||||
ADD R1,R10
|
||||
! ADD R2,R10
|
||||
ADD R2,R10
|
||||
! .EXITM
|
||||
!
|
||||
|
||||
! .MACRO foo bar=a default=b
|
||||
! \bar
|
||||
! \default
|
||||
! bar
|
||||
! default
|
||||
! .ENDM
|
||||
! foo default=dog bar=cat
|
||||
! cat
|
||||
cat
|
||||
! dog
|
||||
dog
|
||||
! bar
|
||||
bar
|
||||
! default
|
||||
default
|
||||
! foo X Y
|
||||
! X
|
||||
X
|
||||
! Y
|
||||
Y
|
||||
! bar
|
||||
bar
|
||||
! default
|
||||
default
|
||||
! foo
|
||||
! a
|
||||
a
|
||||
! b
|
||||
b
|
||||
! bar
|
||||
bar
|
||||
! default
|
||||
default
|
||||
! foo bar=cat default=dog
|
||||
! cat
|
||||
cat
|
||||
! dog
|
||||
dog
|
||||
! bar
|
||||
bar
|
||||
! default
|
||||
default
|
||||
!
|
||||
|
||||
!
|
||||
|
||||
! .MACRO foo bar
|
||||
! HI
|
||||
! HI \bar
|
||||
! HI
|
||||
! .ENDM
|
||||
!
|
||||
|
||||
! foo 1
|
||||
! HI
|
||||
HI
|
||||
! HI 1
|
||||
HI 1
|
||||
! HI
|
||||
HI
|
||||
! foo 123
|
||||
! HI
|
||||
HI
|
||||
! HI 123
|
||||
HI 123
|
||||
! HI
|
||||
HI
|
||||
! foo 1 2 3 4
|
||||
! foo
|
||||
! HI
|
||||
HI
|
||||
! HI
|
||||
HI
|
||||
! HI
|
||||
HI
|
||||
!
|
||||
|
||||
!
|
||||
! .MACRO PUSH Rn
|
||||
! MOV.L \Rn,@-r15
|
||||
! .ENDM
|
||||
! PUSH R0
|
||||
! MOV.L R0,@-r15
|
||||
MOV.L R0,@-r15
|
||||
! PUSH R1
|
||||
! MOV.L R1,@-r15
|
||||
MOV.L R1,@-r15
|
||||
!
|
||||
|
||||
!
|
||||
|
||||
! .MACRO RES_STR STR, Rn
|
||||
! MOV.L #str\@,\Rn
|
||||
! BRA end_str\@
|
||||
! NOP
|
||||
!str\@ .SDATA "\STR"
|
||||
! .ALIGN 2
|
||||
!end_str\@
|
||||
! .ENDM
|
||||
!
|
||||
! RES_STR "ONE",R0
|
||||
! MOV.L #str00018,R0
|
||||
MOV.L #str00018,R0
|
||||
! BRA end_str00018
|
||||
BRA end_str00018
|
||||
! NOP
|
||||
NOP
|
||||
!str00018 .SDATA "ONE"
|
||||
str00018: .byte 79,78,69
|
||||
! .ALIGN 2
|
||||
.align 2
|
||||
!end_str00018
|
||||
end_str00018:
|
||||
! RES_STR "TWO",R1
|
||||
! MOV.L #str00019,R1
|
||||
MOV.L #str00019,R1
|
||||
! BRA end_str00019
|
||||
BRA end_str00019
|
||||
! NOP
|
||||
NOP
|
||||
!str00019 .SDATA "TWO"
|
||||
str00019: .byte 84,87,79
|
||||
! .ALIGN 2
|
||||
.align 2
|
||||
!end_str00019
|
||||
end_str00019:
|
||||
! RES_STR "THREE",R2
|
||||
! MOV.L #str00020,R2
|
||||
MOV.L #str00020,R2
|
||||
! BRA end_str00020
|
||||
BRA end_str00020
|
||||
! NOP
|
||||
NOP
|
||||
!str00020 .SDATA "THREE"
|
||||
str00020: .byte 84,72,82,69,69
|
||||
! .ALIGN 2
|
||||
.align 2
|
||||
!end_str00020
|
||||
end_str00020:
|
||||
!
|
||||
|
||||
!
|
||||
|
||||
!
|
||||
|
||||
! RES_STR STR=donkey Rn=R1
|
||||
! MOV.L #str00021,R1
|
||||
MOV.L #str00021,R1
|
||||
! BRA end_str00021
|
||||
BRA end_str00021
|
||||
! NOP
|
||||
NOP
|
||||
!str00021 .SDATA "donkey"
|
||||
str00021: .byte 100,111,110,107,101,121
|
||||
! .ALIGN 2
|
||||
.align 2
|
||||
!end_str00021
|
||||
end_str00021:
|
||||
! RES_STR donkey,R1
|
||||
! MOV.L #str00022,R1
|
||||
MOV.L #str00022,R1
|
||||
! BRA end_str00022
|
||||
BRA end_str00022
|
||||
! NOP
|
||||
NOP
|
||||
!str00022 .SDATA "donkey"
|
||||
str00022: .byte 100,111,110,107,101,121
|
||||
! .ALIGN 2
|
||||
.align 2
|
||||
!end_str00022
|
||||
end_str00022:
|
||||
! RES_STR donkey Rn=R1
|
||||
! .END
|
||||
|
|
|
@ -0,0 +1,49 @@
|
|||
!
|
||||
|
||||
! .MACRO RESERVE_STR P1=0 P2
|
||||
! .SDATA .SUBSTR("ABCDEFG",\P1,\P2)
|
||||
! .ENDM
|
||||
!
|
||||
|
||||
! RESERVE_STR 2,2
|
||||
! .SDATA .SUBSTR("ABCDEFG",2,2)
|
||||
.byte 67,68
|
||||
! RESERVE_STR ,3
|
||||
! .SDATA .SUBSTR("ABCDEFG",0,3)
|
||||
.byte 65,66,67
|
||||
!
|
||||
|
||||
!
|
||||
|
||||
! .MACRO FIND_STR P1
|
||||
! .DATA.W .INSTR("ABCDEFG","\P1", 0)
|
||||
! .ENDM
|
||||
!
|
||||
|
||||
! FIND_STR CDE
|
||||
! .DATA.W .INSTR("ABCDEFG","CDE", 0)
|
||||
.short 2
|
||||
! FIND_STR H
|
||||
! .DATA.W .INSTR("ABCDEFG","H", 0)
|
||||
.short -1
|
||||
!
|
||||
|
||||
! .MACRO RESERVE_LENGTH P1
|
||||
! .ALIGN 4
|
||||
! .SRES .LEN("\P1")
|
||||
! .ENDM
|
||||
!
|
||||
|
||||
! RESERVE_LENGTH ABCDEF
|
||||
! .ALIGN 4
|
||||
.align 4
|
||||
! .SRES .LEN("ABCDEF")
|
||||
.space 24
|
||||
! RESERVE_LENGTH ABC
|
||||
! .ALIGN 4
|
||||
.align 4
|
||||
! .SRES .LEN("ABC")
|
||||
.space 12
|
||||
!
|
||||
|
||||
! .END
|
Loading…
Reference in New Issue