From 2107960442377296b9ea1f62ec7bc29023e1004a Mon Sep 17 00:00:00 2001
From: Neil Brown <neil@twistedsquare.com>
Date: Mon, 24 Mar 2008 23:46:43 +0000
Subject: [PATCH] Added a couple of testcase programs for reading from the
 keyboard and echoing

---
 testcases/echo.occ      |  8 ++++++++
 testcases/echoquit.rain | 11 +++++++++++
 2 files changed, 19 insertions(+)
 create mode 100644 testcases/echo.occ
 create mode 100644 testcases/echoquit.rain

diff --git a/testcases/echo.occ b/testcases/echo.occ
new file mode 100644
index 0000000..3b1a32d
--- /dev/null
+++ b/testcases/echo.occ
@@ -0,0 +1,8 @@
+PROC echo(CHAN BYTE in, out)
+  BYTE c:
+  WHILE TRUE
+    SEQ
+      in ? c
+      out ! c
+      out ! c
+:
diff --git a/testcases/echoquit.rain b/testcases/echoquit.rain
new file mode 100644
index 0000000..d1a3404
--- /dev/null
+++ b/testcases/echoquit.rain
@@ -0,0 +1,11 @@
+process main(?uint8: in, !uint8: out, !uint8: err)
+{
+	uint8: c;
+	in ? c;
+	while (c <> 'q')
+	{
+		out ! c;
+		out ! c;
+		in ? c;
+	}
+}