diff options
author | dos-reis <gdr@axiomatics.org> | 2010-05-09 16:47:52 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2010-05-09 16:47:52 +0000 |
commit | dc2b7bf37f89919116cc3f599ca7744803013d1e (patch) | |
tree | 8d3a6d9212796031d3b6c2aec936e4f14a518582 /src/interp/interop.boot | |
parent | 86a41a3e4a9ae61f3ab002ead3f16abcbef06130 (diff) | |
download | open-axiom-dc2b7bf37f89919116cc3f599ca7744803013d1e.tar.gz |
More cleanups
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 27095576..49156669 100644 --- a/src/interp/interop.boot +++ b/src/interp/interop.boot @@ -108,7 +108,7 @@ SExprToDName(sexpr, cosigVal) == -- local garbage because Compiler strings are null terminated StringToCompStr(str) == - CONCATENATE(QUOTE STRING, str, STRING (CODE_-CHAR 0)) + strconc(str, STRING (CODE_-CHAR 0)) CompStrToString(str) == SUBSTRING(str, 0, (LENGTH str - 1)) |