[nongnu] elpa/parseclj b2550e6456 133/185: Add docstring for `parseclj-lex--string-value`

[ELPA Syncer]

branch: elpa/parseclj
commit b2550e64560b301f87d2b3b17cca329d85707c7f
Author: Daniel Barreto <daniel.barreto.n@gmail.com>
Commit: Daniel Barreto <daniel.barreto.n@gmail.com>

    Add docstring for `parseclj-lex--string-value`
---
 parseclj-lex.el | 13 ++++++++++---
 1 file changed, 10 insertions(+), 3 deletions(-)

diff --git a/parseclj-lex.el b/parseclj-lex.el
index ea11d3f60b..2f5f8f57b4 100644
--- a/parseclj-lex.el
+++ b/parseclj-lex.el
@@ -93,11 +93,18 @@ A token is an association list with :token-type as its 
first key."
 ;; Elisp values from tokens
 
 (defun parseclj-lex--string-value (s)
-  ""
+  "Parse an EDN string S into a regular string.
+S goes through three transformations:
+- Escaped characters in S are transformed into Elisp escaped
+  characters.
+- Unicode escaped characters are decoded into its corresponding
+  unicode character counterpart.
+- Octal escaped characters are decoded into its corresponding
+  character counterpart."
   (replace-regexp-in-string
    "\\\\o[0-8]\\{3\\}"
    (lambda (x)
-     (make-string 1 (string-to-number (substring x 2) 8) ))
+     (make-string 1 (string-to-number (substring x 2) 8)))
    (replace-regexp-in-string
     "\\\\u[0-9a-fA-F]\\{4\\}"
     (lambda (x)
@@ -115,7 +122,7 @@ A token is an association list with :token-type as its 
first key."
                               (substring s 1 -1)))))
 
 (defun parseclj-lex--character-value (c)
-  "Parse a EDN character C into an Emacs Lisp character."
+  "Parse an EDN character C into an Emacs Lisp character."
   (let ((first-char (elt c 1)))
     (cond
      ((equal c "\\newline") ?\n)