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 7cdab710..250eb63e 100644
--- a/src/interp/c-util.boot
+++ b/src/interp/c-util.boot
@@ -633,7 +633,7 @@ isConstantId(name,e) ==
isFalse() == nil
isFluid s ==
- atom s and char "$" = PNAME(s).0
+ atom s and char "$" = stringChar(PNAME s,0)
isFunction(x,e) ==
get(x,"modemap",e) or GETL(x,"SPECIAL") or x="case" or getmode(x,e) is [