dbo...@mmm.com (J. David Boyd) writes:

> Bernd Paysan <bernd.pay...@gmx.de> writes:
>
>> Am Freitag, 19. Mai 2017, 22:01:16 CEST schrieb James Gere:
>>>      The above, rather inefficient code, works on android gforth.
>>
>> Less clumsy, fully efficient by using TRAVERSE-WORDLISTs end flag:
>>
>> : nwords ( n --- )
>>   cr 0 [: .word >r 1- r> over 0> ;] context @ traverse-wordlist 2drop ;
>>
>> This stuff works on all recent Gforths, not just the Anroid one.
>
>
> when I try that implementation of nwords, I get
>
> error: Stack underflow

Never mind.  Stupid pilot error.   I was typing 'nwords' without putting a
value on the stack....


Reply via email to