on a9130c2 help sign in
16 lines 285 B history raw
1module Plugin (plugin) where
3import GhcPlugins
4import MonadUtils
5import System.IO
6import Control.Monad
8plugin :: Plugin
9plugin = defaultPlugin
10 { installCoreToDos = install
11 }
13install :: CorePlugin
14install files passes = do
15 liftIO . forM files $ flip writeFile ""
16 pure passes