Skip to content

Instantly share code, notes, and snippets.

What would you like to do?
#define proc do
#define void(m)\
m :: IO ();\
m =
void(main) proc
a <- getLine
b <- getLine
putStrLn $ a ++ b
-- ghc -cpp proc.hs
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment