shithub: mc

Info  •  Files  •  Log  •  Branches

Add 'getenvv' function.

    Returns an environment variable, with a default value.

--- a/libstd/env.myr

+++ b/libstd/env.myr

@@ -5,7 +5,8 @@

 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 @@

 	-> `None

 }

+const getenvv = {name, default

+	match getenv(name)

+	| `Some v:	-> v

+	| `None:	-> default

+	;;

+}