change 'say' shortcut from \ to /

2 files changed, 4 insertions, 4 deletions

diff --git a/README.md b/README.md
index f57ab04..1b5f53d 100644
--- a/README.md
+++ b/README.md
@@ -87,15 +87,15 @@ arithmetic bug and expect it to endure. Although, this below remains possible:
     (quote  (a b c))          ; (a b c)
     '(a b c)                  ; (a b c)
 
-`(say x)`, or `\x`, returns an expression without being processed, and with the
+`(say x)`, or `/x`, returns an expression without being processed, and with the
 first `car` as `()`. This result is useful when processing a list and wanting to
 do something at the beginning, because other cons cells should never have `()` in
 `car`:
 
     (say a)                   ; (() . a)
-    \b                        ; (() . b)
+    /b                        ; (() . b)
     (say (a b c))             ; (() a b c)
-    \(a b c)                  ; (() a b c)
+    /(a b c)                  ; (() a b c)
 
 `(split x)` takes a symbol, a number, or a string, returns a list with `x`
 splitted by each character:
diff --git a/liblali.c b/liblali.c
index d49e0f2..a73b004 100644
--- a/liblali.c
+++ b/liblali.c
@@ -647,7 +647,7 @@ Object *readExpr(Stream *stream, GC_PARAM) {
       return NULL;
     else if (ch == '\'')
       return readUnary(stream, "quote", GC_ROOTS);
-    else if (ch == '\\')
+    else if (ch == '/' && !isspace(streamPeek(stream)))
       return readUnary(stream, "say", GC_ROOTS);
     else if (ch == '"')
       return readString(stream, GC_ROOTS);