diff options
Diffstat (limited to 'src/interp/interop.boot')
-rw-r--r-- | src/interp/interop.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/interop.boot b/src/interp/interop.boot index 4c5b62ee..0d076bfa 100644 --- a/src/interp/interop.boot +++ b/src/interp/interop.boot @@ -63,7 +63,7 @@ DNameOtherID := 3 DNameToSExpr1 dname == null dname => error "unexpected domain name" first dname = DNameStringID => - INTERN(CompStrToString rest dname) + makeSymbol(CompStrToString rest dname) name0 := DNameToSExpr1 second dname args := rest rest dname name0 = '_-_> => |