Skip to content

Instantly share code, notes, and snippets.

name: export
build-type: Simple
cabal-version: >= 1.10
executable export
main-is: export.hs
build-depends: base
, aeson
, time
int main(int argc, char *argv[])
char response[20];
scanf("%s", &response);
return 0;
module Main where
main :: IO ()
main = do
l <- getLine
if l == "aei"
then putStrLn "aeiok\n"
else appendFile "/tmp/rabbocopLog" "failed\n"
appendFile "/tmp/rabbocopLog" l
appendFile "/tmp/rabbocopLog" (show $ l == "aei")