shithub: mc

ref: 1ed7430691158c6a2a0c5a7bae36e9e49a43a0e2
dir: /lib/thread/do.myr/

View raw version 
use std

use "future"
use "spawn"

pkg thread =
	generic do	: (fn : (-> @a) -> future(@a)#)
;;

generic do = {fn
	var r

	r = mkfut()
	spawn({; futput(r, fn()) })
	-> r
}