testdata/language-features/basic-list/listcomp07.lc


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

value1 = [ u
         | x <- [(),()]
         , let u = ()
         , True
         , let v = u
         ]

value2 = [ u | x <- [(),()]
         , let u = ()
         , True
         , let v = u
         ]

value3 = [ u
       | x <- [(),()]
      , let
 u = ()
    , True
   , let v = u
 ]