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

[REBOL] Re: Search string x for any substring found in block y.

From: al:bri:xtra at: 13-Dec-2001 7:55

Louis wrote:
> findany: func [
Try: find-any: func [
> if find x y/count [true break]
Try: if found? find x y/:count [return true]
> if findany x y [print found]
Try: if find-any x y [print "found"] And this is a better replacement for 'findany: find-any: func [x [string!] Strings[block!]][ foreach String Strings [ if found? find x String [return true] ] ] I hope that helps somewhat! Andrew Martin ICQ: 26227169 http://valley.150m.com/