diff options
| author | Péter Diviánszky <divipp@gmail.com> | 2016-04-21 21:44:48 +0200 |
|---|---|---|
| committer | Péter Diviánszky <divipp@gmail.com> | 2016-04-21 21:44:48 +0200 |
| commit | b33e4ab5df814da1ef116f3c2e4628ef6d3cfc90 (patch) | |
| tree | 39cf32ad46bc8805212a8532efa851e2247be4cd /testdata | |
| parent | 16bcb9f14732446c62feb9dd0eda0cf1851a5f02 (diff) | |
support guards + where
Diffstat (limited to 'testdata')
| -rw-r--r-- | testdata/language-features/pattern/caseWhere.lc | 8 | ||||
| -rw-r--r-- | testdata/language-features/pattern/caseWhere.out | 1 |
2 files changed, 9 insertions, 0 deletions
diff --git a/testdata/language-features/pattern/caseWhere.lc b/testdata/language-features/pattern/caseWhere.lc new file mode 100644 index 00000000..b2db39d4 --- /dev/null +++ b/testdata/language-features/pattern/caseWhere.lc | |||
| @@ -0,0 +1,8 @@ | |||
| 1 | {-# LANGUAGE NoImplicitPrelude #-} | ||
| 2 | import Internals | ||
| 3 | |||
| 4 | main = case True of | ||
| 5 | b | c -> b | ||
| 6 | where | ||
| 7 | c = b | ||
| 8 | |||
diff --git a/testdata/language-features/pattern/caseWhere.out b/testdata/language-features/pattern/caseWhere.out new file mode 100644 index 00000000..65af037c --- /dev/null +++ b/testdata/language-features/pattern/caseWhere.out | |||
| @@ -0,0 +1 @@ | |||
| [32mTrue[m \ No newline at end of file | |||