a

1 files changed, 8 insertions, 0 deletions

diff --git a/examples/learn/09-shared.zc b/examples/learn/09-shared.zc
new file mode 100644
index 0000000..ab3ca06
--- /dev/null
+++ b/examples/learn/09-shared.zc
@@ -0,0 +1,8 @@
+fn main() {
+	let tail = cons(1, 2);
+	let left = cons(tail, 3);
+	let right = cons(tail, 4);
+	put_n(car(car(left))); put_c(32);
+	put_n(car(left) == car(right)); put_c(10);
+	return 0;
+}