summaryrefslogtreecommitdiff
path: root/starts/meaning-vm/level-1/sugar.cpp
diff options
context:
space:
mode:
authorolpc user <olpc@xo-5d-f7-86.localdomain>2019-12-14 11:48:23 -0800
committerolpc user <olpc@xo-5d-f7-86.localdomain>2019-12-14 11:48:23 -0800
commit0a59d8631e2acb20601e72c6f79d7ce193633844 (patch)
treee8c1292049fd1c6d6b3702bb944d830fc5a9655d /starts/meaning-vm/level-1/sugar.cpp
parentec53662abe09a3ee1502e6ee7042d4ee84f36d1c (diff)
downloadstandingwithresilience-0a59d8631e2acb20601e72c6f79d7ce193633844.tar.gz
standingwithresilience-0a59d8631e2acb20601e72c6f79d7ce193633844.zip
missing changes
Diffstat (limited to 'starts/meaning-vm/level-1/sugar.cpp')
-rw-r--r--starts/meaning-vm/level-1/sugar.cpp1
1 files changed, 1 insertions, 0 deletions
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);
}