Skip to content

Instantly share code, notes, and snippets.

@WimJongeneel

WimJongeneel/take_until.ts Secret

Created October 31, 2020 11:08
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save WimJongeneel/0e3c86a7d54a9727d5871487aadf4086 to your computer and use it in GitHub Desktop.
Save WimJongeneel/0e3c86a7d54a9727d5871487aadf4086 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
take_until.ts
export const take_until = <a>(c: Cont<a>, p: (a:a) => boolean) => {
let taking = true
return create_cont(cb => c.run(v => {
if(p(v) == true) taking = false
if(taking) cb(v)
}))
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment