From 6bb1cff9aaeba02bb2e86aee0bdab7af777799ea Mon Sep 17 00:00:00 2001 From: adam Date: Sun, 7 Sep 2008 04:10:59 +0100 Subject: [PATCH] add predicate-olc-equals-zero test --- tests/dock/predicate-olc-equals-zero.fleet | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100644 tests/dock/predicate-olc-equals-zero.fleet diff --git a/tests/dock/predicate-olc-equals-zero.fleet b/tests/dock/predicate-olc-equals-zero.fleet new file mode 100644 index 0000000..9753aca --- /dev/null +++ b/tests/dock/predicate-olc-equals-zero.fleet @@ -0,0 +1,17 @@ +#expect 5 +#expect 5 +#expect 5 +#expect 4 + +#ship debug : Debug + +debug.in: + set word=5; + set flags a=0, b=0; + set olc=3; + [Rq] [olc=0] set word=4; + [Rq] [olc=0] deliver; + [Rq] deliver; + [Rq] set olc--; + tail; + -- 1.7.10.4