diff options
| author | Gabriel Kerneis | 2014-01-15 12:33:25 +0100 |
|---|---|---|
| committer | Gabriel Kerneis | 2014-01-15 12:33:25 +0100 |
| commit | b4fc4e45891833dff8896b5a9009c197046b8d93 (patch) | |
| tree | 97c13f1f9ccecca06216892a362906bd9b1c59b7 /src | |
| parent | 048256944331ed646225e856fca56728a074f3a6 (diff) | |
Test indexed match
Diffstat (limited to 'src')
| -rw-r--r-- | src/test/vectors.sail | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/test/vectors.sail b/src/test/vectors.sail index f6e0c532..515b2be4 100644 --- a/src/test/vectors.sail +++ b/src/test/vectors.sail @@ -35,6 +35,12 @@ function unit main _ = { case _ -> match_success := i }; + (* indexed match *) + switch i { + case [0=bitzero, 1=bitzero, 2=bitone, 3=bitzero] -> match_success := 1 + case _ -> match_success := i + }; + (* XXX slice access not implemented *) i[0] := bitzero; (* XXX Vector access of non-vector *) |
