Add stringify option for lists; stringify them to read as themselves

module/riverguile.scm

@@ -49,7 +49,8 @@
 (define (stringify x)
   (cond ((string? x) x)
         ((number? x) (number->string x))
-        ((symbol? x) (symbol->string x))))
+        ((symbol? x) (symbol->string x))
+        ((list? x)   (string-join (append '("(") (map stringify x) '(")")) " "))))
 
 (define-syntax R
   (syntax-rules ()