diff options
Diffstat (limited to 'testsuite/tests/ghc-api/annotations/t11430.hs')
| -rw-r--r-- | testsuite/tests/ghc-api/annotations/t11430.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/testsuite/tests/ghc-api/annotations/t11430.hs b/testsuite/tests/ghc-api/annotations/t11430.hs index 9de2100a01..81c070c01c 100644 --- a/testsuite/tests/ghc-api/annotations/t11430.hs +++ b/testsuite/tests/ghc-api/annotations/t11430.hs @@ -30,7 +30,7 @@ main = do testOneFile libdir fileName testOneFile libdir fileName = do - ((anns,cs),p) <- runGhc (Just libdir) $ do + p <- runGhc (Just libdir) $ do dflags <- getSessionDynFlags setSessionDynFlags dflags let mn =mkModuleName fileName @@ -40,7 +40,7 @@ testOneFile libdir fileName = do load LoadAllTargets modSum <- getModSummary mn p <- parseModule modSum - return (pm_annotations p,p) + return p let tupArgs = gq (pm_parsed_source p) |