iom.coffee

fs = require 'fs';


readFile = (fname) ->
        fs.readFileSync fname, encoding: "utf8"


print = (str) ->
        console.log str
        null


main = -> [
        -> print "Hello, what's your name? "
        -> {name: readFile "name.txt"}
        (binding) -> print "Nice to meet you #{binding.name}."
]



runIO = (app) ->
        app().reduce ((init, f) ->
                patch = f init
                unless patch then init else
                        _.conj init, patch), {}


runIO main






## what's the difference to

main = -> ->
        print "blah"
        name = getLine()
        print "blah #{name}"
        
runIO = (f) -> f()

runIO main