diff options
Diffstat (limited to 'testsuite/tests/ghc-api/annotations-literals/literals.hs')
| -rw-r--r-- | testsuite/tests/ghc-api/annotations-literals/literals.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/testsuite/tests/ghc-api/annotations-literals/literals.hs b/testsuite/tests/ghc-api/annotations-literals/literals.hs index 64c0311c07..c216513a90 100644 --- a/testsuite/tests/ghc-api/annotations-literals/literals.hs +++ b/testsuite/tests/ghc-api/annotations-literals/literals.hs @@ -8,6 +8,7 @@ import Data.List (intercalate) import System.IO import GHC import GHC.Driver.Session +import GHC.Driver.Ppr import GHC.Utils.Monad import GHC.Utils.Outputable import GHC.Data.Bag (filterBag,isEmptyBag) @@ -40,4 +41,4 @@ showToks ts = intercalate ",\n\n" $ map (\((L p t),s) -> "(" ++ pp p ++ "," ++ show t ++ ",[" ++ s ++ "])") ts -pp a = showPpr unsafeGlobalDynFlags a +pp a = showPprUnsafe a |