|Arc Cross Reference|
[procedure] reclist test xs
[procedure] recstring test str (o start 0)
Basic traverser of the sequence until it finds the point on which test returns non-nil.
(def reclist (f xs) (and xs (or (f xs) (reclist f (cdr xs)))))
Go through the list until it finds the test function f returns non-nil---note that f receives the spine cell of the list, not the element.
(def recstring (test s (o start 0)) (let n (len s) ((afn (i) (and (< i (len s)) (or (test i) (self (+ i 1))))) start)))
Scan the string beginning with index start. The test function receives index instead of the character.