Add 'try' to libstd.

    This was something I had been thinking about doing, but never
    did until recently because of a compiler bug. Now it works.

1 files changed, 13 insertions, 0 deletions

diff --git a/libstd/try.myr b/libstd/try.myr
new file mode 100644
index 0000000..1539a98
--- /dev/null
+++ b/libstd/try.myr
@@ -0,0 +1,13 @@
+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")
+	;;
+}