diff options
Diffstat (limited to 'testsuite/tests/deSugar/should_run/dsrun017.hs')
-rw-r--r-- | testsuite/tests/deSugar/should_run/dsrun017.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/testsuite/tests/deSugar/should_run/dsrun017.hs b/testsuite/tests/deSugar/should_run/dsrun017.hs index 7a8d16efe5..7f2ba5db64 100644 --- a/testsuite/tests/deSugar/should_run/dsrun017.hs +++ b/testsuite/tests/deSugar/should_run/dsrun017.hs @@ -8,6 +8,6 @@ import GHC.Exts(the,groupWith) main = putStrLn (show output) where - output = [ (the dept, sum salary, name) + output = [ (the dept, sum salary, name) | (dept, salary, name) <- [("A", 1, "Bob"), ("B", 2, "Fred"), ("A", 5, "Jim"), ("A", 9, "Jim")] - , then group by dept using groupWith ]
\ No newline at end of file + , then group by dept using groupWith ] |