From 0a59d8631e2acb20601e72c6f79d7ce193633844 Mon Sep 17 00:00:00 2001 From: olpc user Date: Sat, 14 Dec 2019 11:48:23 -0800 Subject: missing changes --- starts/meaning-vm/level-1/sugar.cpp | 1 + 1 file changed, 1 insertion(+) (limited to 'starts/meaning-vm/level-1') diff --git a/starts/meaning-vm/level-1/sugar.cpp b/starts/meaning-vm/level-1/sugar.cpp index accad6c..025c68e 100644 --- a/starts/meaning-vm/level-1/sugar.cpp +++ b/starts/meaning-vm/level-1/sugar.cpp @@ -20,6 +20,7 @@ ref a(ref group) } ref a(ref group, ref name) { + if (name == nothing) { return a(group); } if (!name.isa(group)) { name.link(is, group); } -- cgit v1.2.3