Skip to content

Instantly share code, notes, and snippets.

View export.cabal
name: export
version: 0.1.0.0
build-type: Simple
cabal-version: >= 1.10
executable export
main-is: export.hs
build-depends: base
, aeson
, time
View gist:581183
int main(int argc, char *argv[])
{
char response[20];
scanf("%s", &response);
printf("aeiok\n");
return 0;
}
View SimpleIOTest.hs
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")
You can’t perform that action at this time.