cfad47cfa3/t3compiler/tads3/test/data/randvec.t

4b825dc642cb6eb9a060e54bf8d69288fbee4904cfad47cfa334b206c65f22086bcc5d63e6f70944
1
#include <tads.h>
2
3
main(args)
4
{
5
    local i = 65;
6
    local v = new Vector(26).fillValue(nil, 1, 26)
7
        .applyAll({x: x = makeString(i++)});
8
9
    for (i = 1 ; i <= 50 ; ++i)
10
        "<<rand(v)>> ";
11
12
    randomize();
13
    "\b";
14
15
    for (i = 1 ; i <= 500 ; ++i)
16
        "<<rand(v)>> ";
17
}
18