cλash-nolibdir/CLasH/Utils.hs

   1 module CLasH.Utils where
   2
   3 import qualified GHC.Paths
   4 import qualified "clash" CLasH.Utils as Original (listBindings, listBind)
   5
   6 -- | Show the core structure of all the binds in the given file.
   7 listBindings :: [FilePath] -> IO [()]
   8 listBindings filenames = do
   9   let libdir = GHC.Paths.libdir
  10   Original.listBindings libdir filename
  11
  12 -- | Show the core structure of the given binds in the given file.
  13 listBind :: [FilePath] -> String -> IO ()
  14 listBind filename name = do
  15   let libdir = GHC.Paths.libdir
  16   Original.listBind libdir filename name