[REBOL] Re: Find? Copy/Part?
From: ammon:johnson::gmail at: 18-Jan-2005 11:57
Something like this?
find-position: func [
series [series!]
value [series!]
count [integer!]
/local cur-pos
][
cur-pos: copy series
for i 1 count 1 [
cur-pos: find cur-pos value
]
either none? cur-pos [
Print "The value does not exist in the series that many times."
][
return index? cur-pos
]
]
I didn't test this, but it should at least give you an idea or two...
Enjoy!!
~~Ammon ;~>
On Tue, 18 Jan 2005 16:14:57 -0200, Carlos Lorenz
<[carlos--lorenz--gmail--com]> wrote:
> Gabriele,
>
> The question is that I cannot figure out how to do it using find.
> Would you mind to give a help?
>
> On Tue, 18 Jan 2005 18:18:19 +0100, Gabriele Santilli
> <[gabriele--colellachiara--com]> wrote:
> >
> > Hi Carlos,
> >
> > On Tuesday, January 18, 2005, 6:05:40 PM, you wrote:
> >
> > CL> Would it be very nice to have an AT-like native function in
> > CL> REBOL/Core, don't you think so?
> >
> > And what would it do, that FIND doesn't do already?
> >
> > Regards,
> > Gabriele.
> > --
> > Gabriele Santilli <[g--santilli--tiscalinet--it]> -- REBOL Programmer
> > Amiga Group Italia sez. L'Aquila --- SOON: http://www.rebol.it/
> >
> > --
> > To unsubscribe from the list, just send an email to rebol-request
> > at rebol.com with unsubscribe as the subject.
> >
> >
>
> --
> *:-.,_,.-:*'``'*:-.,_,.-:
> Carlos Lorenz
> *:-.,_,.-:*'``'*:-.,_,.-:
> --
> To unsubscribe from the list, just send an email to rebol-request
> at rebol.com with unsubscribe as the subject.
>
--
Enjoy!!
~~~ Ammon ~~~
~ Sui Generis ~
~~~~ ;~> ~~~~
