diff options
| author | Péter Diviánszky <divipp@gmail.com> | 2016-05-03 11:02:08 +0200 |
|---|---|---|
| committer | Péter Diviánszky <divipp@gmail.com> | 2016-05-03 11:02:08 +0200 |
| commit | ae11122ec0acdedf11d7fdf443088d61e8a2bd42 (patch) | |
| tree | 1dab171ce8cc9a871a9d80e0b8c73c4a0dbe8ccc /testdata/language-features/recursion | |
| parent | 438e4a1b062a73b667adf0fd94167dcc311929d3 (diff) | |
support mutually defined constants (first version)
Diffstat (limited to 'testdata/language-features/recursion')
| -rw-r--r-- | testdata/language-features/recursion/mutualRec.lc | 8 | ||||
| -rw-r--r-- | testdata/language-features/recursion/mutualRec.out | 1 |
2 files changed, 9 insertions, 0 deletions
diff --git a/testdata/language-features/recursion/mutualRec.lc b/testdata/language-features/recursion/mutualRec.lc new file mode 100644 index 00000000..c9ae6135 --- /dev/null +++ b/testdata/language-features/recursion/mutualRec.lc | |||
| @@ -0,0 +1,8 @@ | |||
| 1 | |||
| 2 | x = 2: y | ||
| 3 | y = 1: x | ||
| 4 | |||
| 5 | main = case (x :: [Int]) of | ||
| 6 | 2: 1: 2: _ -> True | ||
| 7 | |||
| 8 | |||
diff --git a/testdata/language-features/recursion/mutualRec.out b/testdata/language-features/recursion/mutualRec.out new file mode 100644 index 00000000..f832724c --- /dev/null +++ b/testdata/language-features/recursion/mutualRec.out | |||
| @@ -0,0 +1 @@ | |||
| [32mTrue[0m \ No newline at end of file | |||