diff options
author | Mike Buland <eichlan@xagasoft.com> | 2012-02-08 00:24:06 -0700 |
---|---|---|
committer | Mike Buland <eichlan@xagasoft.com> | 2012-02-08 00:24:06 -0700 |
commit | a859a39f3455fcbf0575bd7acd25915c40922f92 (patch) | |
tree | 709c900083529913c45e782c430eec82dba9e642 /tests/t.stage | |
parent | 11554a9e5c92a98129b42598495abe7503d9208c (diff) | |
download | stage-883c473bac949def867b8834d01e661fe357040e.tar.gz stage-883c473bac949def867b8834d01e661fe357040e.tar.bz2 stage-883c473bac949def867b8834d01e661fe357040e.tar.xz stage-883c473bac949def867b8834d01e661fe357040e.zip |
Committed the tests I've been using.0.05
Good for regressions, I'll have to make some sort of test suite thing
later.
Diffstat (limited to 'tests/t.stage')
-rw-r--r-- | tests/t.stage | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/tests/t.stage b/tests/t.stage new file mode 100644 index 0000000..c97fe4f --- /dev/null +++ b/tests/t.stage | |||
@@ -0,0 +1,29 @@ | |||
1 | |||
2 | situation <<start>> | ||
3 | { | ||
4 | setup | ||
5 | { | ||
6 | display("Hi"); | ||
7 | } | ||
8 | enter | ||
9 | { | ||
10 | display("start pre"); | ||
11 | goAhead(); | ||
12 | display("start post"); | ||
13 | } | ||
14 | } | ||
15 | |||
16 | function goAhead() | ||
17 | { | ||
18 | display("goAhead() pre"); | ||
19 | goto( <<next>> ); | ||
20 | display("goAhead() post"); | ||
21 | } | ||
22 | |||
23 | situation <<next>> | ||
24 | { | ||
25 | enter | ||
26 | { | ||
27 | display("This is next."); | ||
28 | } | ||
29 | } | ||