From 46439007cf417cbd9ac8049bb4122c890097a0fa Mon Sep 17 00:00:00 2001
From: "Charles.Forsyth" <devnull@localhost>
Date: Fri, 22 Dec 2006 20:52:35 +0000
Subject: 20060303-partial

---
 module/env.m | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 module/env.m

(limited to 'module/env.m')

diff --git a/module/env.m b/module/env.m
new file mode 100644
index 00000000..cfa113a3
--- /dev/null
+++ b/module/env.m
@@ -0,0 +1,10 @@
+Env: module {
+	getenv:	fn(var: string): string;		# returns nil if var not set
+	setenv:	fn(var: string, val: string): int;	# returns -1 on failure
+	getall: fn(): list of (string, string);
+
+	clone:	fn(): int;					# forks a copy of the environment, returns -1 on failure
+	new:		fn(): int;					# sets up new empty environment, returns -1 on failure
+
+	PATH:	con "/dis/lib/env.dis";
+};
-- 
cgit v1.2.3