aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-map.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/i-map.boot')
-rw-r--r--src/interp/i-map.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-map.boot b/src/interp/i-map.boot
index 10b64ceb..ab24945f 100644
--- a/src/interp/i-map.boot
+++ b/src/interp/i-map.boot
@@ -60,7 +60,7 @@ isInternalMapName name ==
(not IDENTP(name)) or (name = "*") or (name = "**") => false
sz := SIZE (name' := PNAME name)
(sz < 7) or (char("*") ~= name'.0) => false
- null DIGITP name'.1 => false
+ null digit? name'.1 => false
null STRPOS('"_;",name',1,NIL) => false
-- good enough
true