Add 'getenvv' function.

    Returns an environment variable, with a default value.

1 files changed, 8 insertions, 1 deletions

diff --git a/libstd/env.myr b/libstd/env.myr
index 85bced9..6dd7756 100644
--- a/libstd/env.myr
+++ b/libstd/env.myr
@@ -5,7 +5,8 @@ use "sleq.use"
 pkg std =
 	extern var _environment	: byte[:][:]
 
-	const getenv :	(name : byte[:] -> std.option(byte[:]))
+	const getenv :	(name : byte[:] -> option(byte[:]))
+	const getenvv :	(name : byte[:], default : byte[:] -> byte[:])
 ;;
 
 const getenv = {name
@@ -19,3 +20,9 @@ const getenv = {name
 	-> `None
 }
 
+const getenvv = {name, default
+	match getenv(name)
+	| `Some v:	-> v
+	| `None:	-> default
+	;;
+}