Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[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"]