diff options
Diffstat (limited to 'src/interp/showimp.boot')
| -rw-r--r-- | src/interp/showimp.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/showimp.boot b/src/interp/showimp.boot index 7dfe9c18..06ab08b0 100644 --- a/src/interp/showimp.boot +++ b/src/interp/showimp.boot @@ -142,7 +142,7 @@ getExtensionsOfDomain domain == u := getDomainExtensionsOfDomain domain cats := getCategoriesOfDomain domain for x in u repeat - cats := union(cats,getCategoriesOfDomain EVAL x) + cats := union(cats,getCategoriesOfDomain eval x) [:u,:cats] getDomainExtensionsOfDomain domain == @@ -150,7 +150,7 @@ getDomainExtensionsOfDomain domain == d := domain while (u := devaluateSlotDomain(5,d)) repeat acc := [u,:acc] - d := EVAL u + d := eval u acc devaluateSlotDomain(u,dollar) == |