() Paul Smith <psm...@gnu.org>
() Sun, 22 Jan 2012 16:56:19 -0500

      ;; Printable string (no special characters)
      ((and (string? x)
            (eq? (string-length (string-delete x char-set:printing)) 0))
       x)

   It's trying to determine if the string contains any non-printable chars.

   How can I write this [...]

Use ‘and-map’ with a predicate wrapped around ‘char-set:printing’ directly.

Reply via email to