aboutsummaryrefslogtreecommitdiff
path: root/src/interp/c-util.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/c-util.boot')
-rw-r--r--src/interp/c-util.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/c-util.boot b/src/interp/c-util.boot
index f5cd44b4..ab41941f 100644
--- a/src/interp/c-util.boot
+++ b/src/interp/c-util.boot
@@ -1240,7 +1240,7 @@ foldSpadcall form ==
foldSpadcall x
form.op isnt 'SPADCALL => form
fun := lastNode form
- fun isnt [["getShellEntry","$",slot]] => form
+ fun isnt [['%tref,'$,slot]] => form
op := getCapsuleDirectoryEntry slot
op = nil => form
fun.first := "$"