Add system tests, implement syscall

6 files changed, 21 insertions, 0 deletions

diff --git a/systemtest/config/unix.exp b/systemtest/config/unix.exp
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/systemtest/config/unix.exp
diff --git a/systemtest/lib/mcc.exp b/systemtest/lib/mcc.exp
new file mode 100644
index 0000000..e69de29
--- /dev/null
+++ b/systemtest/lib/mcc.exp
diff --git a/systemtest/mcc-compile.tests/compile.exp b/systemtest/mcc-compile.tests/compile.exp
new file mode 100644
index 0000000..7866d6f
--- /dev/null
+++ b/systemtest/mcc-compile.tests/compile.exp
@@ -0,0 +1 @@
+# https://www.embecosm.com/appnotes/ean8/ean8-howto-dejagnu-1.0.html
diff --git a/systemtest/mcc-execute.tests/exitcodes.exp b/systemtest/mcc-execute.tests/exitcodes.exp
new file mode 100644
index 0000000..6e8b632
--- /dev/null
+++ b/systemtest/mcc-execute.tests/exitcodes.exp
@@ -0,0 +1,18 @@
+# https://www.embecosm.com/appnotes/ean8/ean8-howto-dejagnu-1.0.html
+
+spawn systemtest/mcc-execute.tests/test1
+
+expect eof
+
+lassign [wait] pid spawnid os_error_flag value
+
+if {$os_error_flag == 0} {
+  if {$value == 3} {
+    pass "exit status: $value"
+  } else {
+    fail "exit status: $value"
+  }
+} else {
+  fail "errno: $value"
+}
+
diff --git a/systemtest/mcc-execute.tests/test.cpp b/systemtest/mcc-execute.tests/test.cpp
new file mode 100644
index 0000000..40cbb54
--- /dev/null
+++ b/systemtest/mcc-execute.tests/test.cpp
@@ -0,0 +1 @@
+int main() { return 1; }
diff --git a/systemtest/mcc-execute.tests/test1.cpp b/systemtest/mcc-execute.tests/test1.cpp
new file mode 100644
index 0000000..3a03f6f
--- /dev/null
+++ b/systemtest/mcc-execute.tests/test1.cpp
@@ -0,0 +1 @@
+int main() { return 1 + 2; }