shithub: mc

Download patch

ref: 38941f5eadd5e3606776d3c0004b997fb53ba399
parent: 73c618bf4af5f96b4d1c0790662b6bd9e0a1f33e
author: Ori Bernstein <ori@eigenstate.org>
date: Sun Sep 10 15:11:29 EDT 2017

Add `tmpdir` function.

--- a/lib/fileutil/bld.sub
+++ b/lib/fileutil/bld.sub
@@ -1,6 +1,7 @@
 lib fileutil =
 	walk.myr
 	homedir.myr
+	tmpdir.myr
 
 	lib ../sys:sys
 	lib ../std:std
--- /dev/null
+++ b/lib/fileutil/tmpdir.myr
@@ -1,0 +1,12 @@
+use std
+
+pkg fileutil =
+	const homedir	: (-> byte[:])
+;;
+
+const homedir = {
+	match std.getenv("TMPDIR")
+	| `std.Some h:	-> d
+	| `std.None:	-> "/tmp"
+	;;
+}