module LLVM.DSL.Dump (writer) where import qualified LLVM.Core as LLVM writer :: String -> IO (String -> LLVM.Module -> IO ()) writer _name = return $ const $ const $ return ()