Alan wrote:
> I still can't get rid of one 'append though ...
> ...
> s: j: i: 0
> state: make block! 256
> loop 256 [append state s s: s + 1]

Try:
        S: 0
        State: make block! 256
        loop length? State [
            insert state S
            S: S + 1
            ]
        reverse State

I think that might be faster.

A better alternative is to pregenerate this block, save to a file and then
load it as needed. For example:
        State: [
            0 1 2 3 4 ; and so on.
            ]
        save %State.r State
        ;...
        State: load %State.r

Andrew Martin
ICQ: 26227169 http://valley.150m.com/
-><-



-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to