bash, nim: fix self-hosted string handling

diff --git a/bash/core.sh b/bash/core.sh
index d8373eb..ffc8dfb 100644 (file)
--- a/bash/core.sh
+++ b/bash/core.sh
@@ -98,8 +98,7 @@ prn () {
 println () {
     local res=""
     for x in "${@}"; do _pr_str "${x}"; res="${res} ${r}"; done
-    res="${res//\\n/$'\n'}"
-    echo -e "${res:1}"
+    echo "${res:1}"
     r="${__nil}"; 
 }
 

diff --git a/bash/reader.sh b/bash/reader.sh
index 359a6a0..4274032 100644 (file)
--- a/bash/reader.sh
+++ b/bash/reader.sh
@@ -13,9 +13,9 @@ READ_ATOM () {
     case "${token}" in
         [0-9]*) _number "${token}" ;;
         \"*)    token="${token:1:-1}"
-                token="${token//\\\\/\\}"
                 token="${token//\\\"/\"}"
                 token="${token//\\n/$'\n'}"
+                token="${token//\\\\/\\}"
                 _string "${token}" ;;
         :*)     _keyword "${token:1}" ;;
         nil)    r="${__nil}" ;;

diff --git a/nim/core.nim b/nim/core.nim
index 2d9a316..f7f39a4 100644 (file)
--- a/nim/core.nim
+++ b/nim/core.nim
@@ -15,8 +15,7 @@ proc prn(xs: varargs[MalType]): MalType =
   result = nilObj
 
 proc println(xs: varargs[MalType]): MalType =
-  let line = xs.map(proc(x: MalType): string = x.pr_str(false)).join(" ")
-  echo line.replace("\\n", "\n")
+  echo xs.map(proc(x: MalType): string = x.pr_str(false)).join(" ")
   result = nilObj
 
 proc read_str(xs: varargs[MalType]): MalType =