[REBOL] findany
From: louisaturk::eudoramail::com at: 23-Dec-2001 23:09
Rebol friends, Why won't the following function work? Is there a better way to do this? Is there a native rebol function for this that I have missed? Louis findany: func [ "Searches string x for any substring found in block ys." x [string!] "string" ys [block!] "block of substrings" ] [ foreach y ys [ if find x y [true break] ] ] x: "There is a dog in the barn." ys: ["cat" "pig" "dog" "skunk"] if findany x ys [print "found"]