[r6rs-discuss] Re: [Formal] formal comment (ports, characters, strings, Unicode)

[R. Kent Dybvig]

> However, we can obviously do much better if we
> have a string-for-each procedure that is O(N).  Unfortunately, we have
> no portable way to write this procedure without string-ref.

What about:

(define string-for-each
  (lambda (p s)
    (for-each p (string->list s))))

Kent