From a859a39f3455fcbf0575bd7acd25915c40922f92 Mon Sep 17 00:00:00 2001
From: Mike Buland <eichlan@xagasoft.com>
Date: Wed, 8 Feb 2012 00:24:06 -0700
Subject: Committed the tests I've been using.

Good for regressions, I'll have to make some sort of test suite thing
later.
---
 tests/l.stage | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)
 create mode 100644 tests/l.stage

(limited to 'tests/l.stage')

diff --git a/tests/l.stage b/tests/l.stage
new file mode 100644
index 0000000..4c2b8e1
--- /dev/null
+++ b/tests/l.stage
@@ -0,0 +1,32 @@
+situation <<start>>
+{
+	enter
+	{
+		x = 5;
+		while x > 0 do
+		{
+			display( x );
+			x-=1;
+		}
+
+		for each j in [1, 2, 4, 8, 16, 32] do
+		{
+			display( j );
+
+			if j == 16 then
+			{
+				goto(<<b>>);
+			}
+		}
+
+		display("Hiya");
+	}
+}
+
+situation <<b>>
+{
+	enter
+	{
+		display("b!");
+	}
+}
-- 
cgit v1.2.3