| From: Matthew Flatt (mflatt at cs.utah.edu) Date: Sun Mar 19 09:12:15 EST 2006 |
|
At Sun, 19 Mar 2006 12:26:28 +0100, Hans Oesterholt-Dijkema wrote:
> The last two solutions are comparable in speed. However, I want a still
> faster solution.
This one is slightly faster (or a lot faster when the JIT is
unavailable or disabled):
(define (is-space? str)
(and (regexp-match-positions #rx"^[ \t\r\n]+$" str) #t))
Matthew
| Posted on the users mailing list. |
|