aboutsummaryrefslogtreecommitdiff
path: root/examples/learn/09-shared.zc
blob: db5c407a4a9057f72d2073cc25a54411677601cd (plain) (blame)
1
2
3
4
5
6
7
8
9
namespace;
include rt;
fn main() {
	let tail = rt.cons(1, 2);
	let left = rt.cons(tail, 3);
	let right = rt.cons(tail, 4);
	rt.put_n(rt.car(rt.car(left))); rt.put_c(32);
	rt.put_n(rt.car(left) == rt.car(right)); rt.put_c(10);
}