diff options
Diffstat (limited to 'testsuite/tests/driver/T4437.hs')
| -rw-r--r-- | testsuite/tests/driver/T4437.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/driver/T4437.hs b/testsuite/tests/driver/T4437.hs index 1dfaa8b03a..f8b2f98c66 100644 --- a/testsuite/tests/driver/T4437.hs +++ b/testsuite/tests/driver/T4437.hs @@ -8,7 +8,7 @@ import Language.Haskell.Extension main :: IO () main = do - let ghcExtensions = [ ext | (ext, _, _) <- xFlags ] + let ghcExtensions = map flagSpecName xFlags cabalExtensions = map show [ toEnum 0 :: KnownExtension .. ] ghcOnlyExtensions = ghcExtensions \\ cabalExtensions cabalOnlyExtensions = cabalExtensions \\ ghcExtensions |