[REBOL] Re: Multiple Find Function
From: reboler:programmer at: 20-Feb-2002 19:27
Ooops! I meant multi-find: func [ "Find multiple instances of a value in a series and output their index position" ser [series!] "series to search" val "value to find" /local found out ][ out: copy/deep reduce [val []] parse ser [any [thru val found: (append out/2 (index? found) - length? val)]] out ] Notice that there is no "return" anywhere in site ;)