add Limbo: language, samples

2025-10-29 17:50:22 +00:00 · 2015-04-05 02:34:02 +03:00
parent 3e06b95f98
commit 35f2699eb3
4 changed files with 94 additions and 0 deletions
--- a/samples/Limbo/lock.b
+++ b/samples/Limbo/lock.b
@@ -0,0 +1,26 @@
+implement Lock;
+
+include "sys.m";
+	sys:	Sys;
+include "lock.m";
+
+Semaphore.obtain(l: self ref Semaphore)
+{
+	l.c <-= 0;
+}
+
+Semaphore.release(l: self ref Semaphore)
+{
+	<-l.c;
+}
+
+Semaphore.new(): ref Semaphore
+{
+	l := ref Semaphore;
+	l.c = chan[1] of int;
+	return l;
+}
+
+init()
+{
+}