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

[REBOL] Re: [FIND] [FoxPro] Re: Find? Copy/Part?

From: lmecir:mbox:vol:cz at: 19-Jan-2005 14:08

Andreas Bolka napsal(a):
>Wednesday, January 19, 2005, 12:23:28 PM, Gabriele wrote: > >>so you'd need to check PARSE's result and return NONE if it didn't >>match. >> >> > >and so that this exercise is not left to the reader: > > find-nth: func [ > "Returns the series at occurrence N of value or none." > series [series!] > value > n [integer!] > /local pos > ] [ > either parse series [n [to value pos: value] to end] [pos] [none] > ] >
I sent my correction find-nth: func [ "Returns the series at occurrence N of value or none." series [series!] value n [integer!] /local pos ] [ if parse series [n [to value pos: value] to end] [pos] ] immediately, but it didn't make it to the list yet :-(