20060303-partial

1 files changed, 13 insertions, 0 deletions

diff --git a/module/lock.m b/module/lock.m
new file mode 100644
index 00000000..ffd818c5
--- /dev/null
+++ b/module/lock.m
@@ -0,0 +1,13 @@
+Lock: module
+{
+	PATH:	con "/dis/lib/lock.dis";
+
+	Semaphore: adt {
+		c: chan of int;
+		obtain:	fn(nil: self ref Semaphore);
+		release: fn(nil: self ref Semaphore);
+		new: fn(): ref Semaphore;
+	};
+	
+	init: fn();
+};