[deliverable/binutils-gdb.git] / gas / testsuite / gas / mri / mri.exp

#
# Test the m68k MRI compatibility mode.
#
# I originally thought that most of tests applied to any MRI
# assembler, but it turns out that different MRI assemblers use
# different syntaxes.
#

if ![istarget "m68*-*-*"] {
    return
}

# These tests are generic MRI tests: they don't rely on M68K opcodes.
run_dump_test label
run_dump_test equ
run_dump_test float
run_dump_test char
run_dump_test expr
run_dump_test common
run_dump_test comment
gas_test "empty.s" "-M" "" "MRI empty macro"
run_dump_test semi

if {[istarget "m6811-*-*"] || [istarget "m6812-*-*"]} {
    return
}

# Next tests contain 68K opcodes
run_dump_test constants
run_dump_test immconst
run_dump_test for
run_dump_test if
run_dump_test repeat
run_dump_test while
run_dump_test moveml
Commit	Line	Data
252b5132 RH	1	#
	2	# Test the m68k MRI compatibility mode.
	3	#
	4	# I originally thought that most of tests applied to any MRI
	5	# assembler, but it turns out that different MRI assemblers use
	6	# different syntaxes.
	7	#
	8
	9	if ![istarget "m68--*"] {
	10	return
	11	}
	12
98a79704	13	# These tests are generic MRI tests: they don't rely on M68K opcodes.
252b5132 RH	14	run_dump_test label
252b5132 RH	15	run_dump_test equ
252b5132 RH	16	run_dump_test float
	17	run_dump_test char
	18	run_dump_test expr
	19	run_dump_test common
	20	run_dump_test comment
	21	gas_test "empty.s" "-M" "" "MRI empty macro"
98a79704 SC	22	run_dump_test semi
98a79704 SC	23
31abcf7d	24	if {[istarget "m6811--"] \|\| [istarget "m6812--"]} {
98a79704 SC	25	return
	26	}
	27
	28	# Next tests contain 68K opcodes
	29	run_dump_test constants
	30	run_dump_test immconst
252b5132 RH	31	run_dump_test for
	32	run_dump_test if
	33	run_dump_test repeat
	34	run_dump_test while
252b5132	35	run_dump_test moveml