sim: iq2000: add a basic testsuite

sim/testsuite/sim/iq2000/ChangeLog

@@ -0,0 +1,3 @@
+2015-04-05  Mike Frysinger  <vapier@gentoo.org>
+
+	* pass.s, allinsn.exp, testutils.inc: New files.

sim/testsuite/sim/iq2000/allinsn.exp

@@ -0,0 +1,15 @@
+# iq2000 simulator testsuite
+
+if [istarget iq2000-*] {
+    # all machines
+    set all_machs "iq2000"
+
+    foreach src [lsort [glob -nocomplain $srcdir/$subdir/*.s]] {
+	# If we're only testing specific files and this isn't one of them,
+	# skip it.
+	if ![runtest_file_p $runtests $src] {
+	    continue
+	}
+	run_sim_test $src $all_machs
+    }
+}

sim/testsuite/sim/iq2000/pass.s

@@ -0,0 +1,7 @@
+# check that the sim doesn't die immediately.
+# mach: iq2000
+
+.include "testutils.inc"
+
+	start
+	pass

sim/testsuite/sim/iq2000/testutils.inc

@@ -0,0 +1,53 @@
+# MACRO: exit
+	.macro exit nr
+	ori r5, r0, \nr;
+	# Trap function 1: exit().
+	ori r4, r0, 1;
+	syscall;
+	.endm
+
+# MACRO: pass
+# Write 'pass' to stdout and quit
+	.macro pass
+	# Trap function 5: write().
+	ori r4, r0, 5;
+	# Use stdout.
+	ori r5, r0, 1;
+	# Point to the string.
+	lui r6, %hi(1f);
+	ori r6, r6, %lo(1f);
+	# Number of bytes to write.
+	ori r7, r0, 5;
+	# Trigger OS trap.
+	syscall;
+	exit 0
+	.data
+	1: .asciz "pass\n"
+	.endm
+
+# MACRO: fail
+# Write 'fail' to stdout and quit
+	.macro fail
+	# Trap function 5: write().
+	ori r4, r0, 5;
+	# Use stdout.
+	ori r5, r0, 1;
+	# Point to the string.
+	lui r6, %hi(1f);
+	ori r6, r6, %lo(1f);
+	# Number of bytes to write.
+	ori r7, r0, 5;
+	# Trigger OS trap.
+	syscall;
+	exit 0
+	.data
+	1: .asciz "fail\n"
+	.endm
+
+# MACRO: start
+# All assembler tests should start with a call to "start"
+	.macro start
+	.text
+.global _start
+_start:
+	.endm