This works in the non-optimizing compiler (for example, the Listener):

3 [ f ] times

But not in the optimizing compiler.  I pushed a quick fix that makes your
word work:

https://github.com/factor/factor/commit/e17b9119293783728e193b29856d81ba5862c8eb



On Fri, Oct 4, 2019 at 5:29 PM KUSUMOTO Norio <kusum...@na.rim.or.jp> wrote:

> I would like to use nfind as an escapable 2each, but I'm in trouble.
> I simplified the problem as follows:
>
> In scratchpad, when I input:
>
> USE: sequences.generalizations
> { 1 2 3 4 5 } { 5 4 3 2 1 } [ > ] 2 nfind
>
> get:
>
> --- Data stack:
> 3
> 4
> 2
>
> And I define nfind-test and use it:
>
> : nfind-test ( x y -- i/f elt1 elt2 ) [ > ] 2 nfind ;
> { 1 2 3 4 5 } { 5 4 3 2 1 } nfind-test
>
> But I receive an error:
>
> The word nfind-test cannot be executed because it failed to compile
>
> The input quotation to “times” doesn't match its expected effect
> Input Expected       Got
> [ f ] ( ... -- ... ) ( -- x )
>
>
> What am I wrong?
>
>
> --
> KUSUMOTO Norio
>
>
>
> _______________________________________________
> Factor-talk mailing list
> Factor-talk@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/factor-talk
>
_______________________________________________
Factor-talk mailing list
Factor-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/factor-talk

Reply via email to