Skip to content

Instantly share code, notes, and snippets.

Forked from joepie91/map.js
Last active Aug 28, 2015
What would you like to do?
Bluebird map + bhttp
(* Assume bhttp-get is available here somehow *)
let HTTP = {
def get: url
(* This would actually need to be imported properly. Yeah, FFI sucks, but oh well... *)
Task from-promise: (FFI invoke: bhttp-get in-context: unit with-arguments: [FFI export: url])
do {
response <- HTTP get: "";
url <- response at: "body" >> as-string >> split: "\n";
HTTP get: url
} recover: { error |
Console log!: error
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment