concatenative pogo

concat.pogo

async = require 'async'
 
one ! = 1
two ! = 2
plus ! (x, y) = x + y
log ! (x) = console.log (x)
 
concat (memo, item, callback) =
    done = @(err, result)
        callback (err, memo.concat(result))
        
    args = []
    for (i = 0, i < item.length - 1, ++i)
        args.push(memo.pop())
        
    item.apply (this, args.concat(done))
        
async.reduce ([one, two, plus, log], [], concat) @{}