diff options
Diffstat (limited to 'testsuite/tests/ghc-api/T10942.hs')
-rw-r--r-- | testsuite/tests/ghc-api/T10942.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/ghc-api/T10942.hs b/testsuite/tests/ghc-api/T10942.hs index 06cdcd62e4..a37d279c3a 100644 --- a/testsuite/tests/ghc-api/T10942.hs +++ b/testsuite/tests/ghc-api/T10942.hs @@ -21,4 +21,4 @@ main = do parser_opts = initParserOpts dflags' setSessionDynFlags dflags' stringBuffer <- liftIO $ hGetStringBuffer filename - liftIO $ print (map unLoc (getOptions parser_opts stringBuffer filename)) + liftIO $ print (map unLoc (snd $ getOptions parser_opts stringBuffer filename)) |