shithub: mc

ref: 151ac13992ccc9c1b02c3fa32a36c2588edcc2f5
dir: /libstd/try.myr/

View raw version 
use "option.use"
use "fmt.use"

pkg std =
	generic try : (v : option(@a) -> @a)
;;

generic try = {v
	match v
	| `Some x:	-> x
	| `None:	fatal(1, "expected `Some @a, got `None\n")
	;;
}