X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=c%CE%BBash%2FCLasH%2FUtils%2FPretty.hs;h=df78ad9ca9fea259af4ad00f857d210c6391abd3;hb=75978cf28a619d14ae27ea2bb4a53246b6a0bcd8;hp=56b3aaf6238d536745bbeaa50dedf77a8be86cb7;hpb=fcadaad2e47e5f6cba4b9f7d4341477b8fe74158;p=matthijs%2Fmaster-project%2Fc%CE%BBash.git diff --git "a/c\316\273ash/CLasH/Utils/Pretty.hs" "b/c\316\273ash/CLasH/Utils/Pretty.hs" index 56b3aaf..df78ad9 100644 --- "a/c\316\273ash/CLasH/Utils/Pretty.hs" +++ "b/c\316\273ash/CLasH/Utils/Pretty.hs" @@ -1,21 +1,19 @@ module CLasH.Utils.Pretty (prettyShow, pprString, pprStringDebug) where - +-- Standard imports import qualified Data.Map as Map -import qualified Data.Foldable as Foldable -import qualified List +import Text.PrettyPrint.HughesPJClass +-- GHC API import qualified CoreSyn -import qualified Module -import qualified HscTypes -import Text.PrettyPrint.HughesPJClass import Outputable ( showSDoc, showSDocDebug, ppr, Outputable, OutputableBndr) +-- VHDL Imports import qualified Language.VHDL.Ppr as Ppr import qualified Language.VHDL.AST as AST import qualified Language.VHDL.AST.Ppr -import CLasH.Translator.TranslatorTypes +-- Local imports import CLasH.VHDL.VHDLTypes import CLasH.Utils.Core.CoreShow