summaryrefslogtreecommitdiff
path: root/src/test/pattern.sail
diff options
context:
space:
mode:
authorGabriel Kerneis2014-01-14 18:17:18 +0100
committerGabriel Kerneis2014-01-14 18:57:47 +0100
commit048256944331ed646225e856fca56728a074f3a6 (patch)
treeb04a297de796a1a19061cf4ec213e43cac199856 /src/test/pattern.sail
parent3a2d580deda67a57c3bf29f5fbd350e366c8562b (diff)
Fix vector concat pattern matching
The concatenation list was reversed.
Diffstat (limited to 'src/test/pattern.sail')
-rw-r--r--src/test/pattern.sail2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/test/pattern.sail b/src/test/pattern.sail
index 22f0bcc4..e8fc1705 100644
--- a/src/test/pattern.sail
+++ b/src/test/pattern.sail
@@ -14,7 +14,7 @@ function unit main _ = {
case x -> { x := 99; x }
});
- (* doesn't work - main returns 1 instead of 42 *)
+ (* doesn't work - main returns 1 instead of 99 *)
n := 3;
switch n {
case 0 -> { 21 }