mirror of
https://github.com/haskell/ghcide.git
synced 2024-11-26 12:25:25 +03:00
70cb92cc01
* Support preprocessors * Add a preprocessor for testing * Add a preprocessor test
11 lines
205 B
Haskell
11 lines
205 B
Haskell
|
|
module Main(main) where
|
|
|
|
import System.Environment
|
|
|
|
main :: IO ()
|
|
main = do
|
|
_:input:output:_ <- getArgs
|
|
let f = map (\x -> if x == 'x' then 'y' else x)
|
|
writeFile output . f =<< readFile input
|