Very slowly works with strings

[relo]

Very slowly works with strings.
There is a dim from 5000 lines, a simple cycle of check borrows about 3 seconds.

dim(words_spr$, 9000);
words_count$=5000;
game_nastr.wordin$="GAME";

cn_p$ = false;
for (i$, 0, words_count$)
s$ = upper(words_spr$[i$]);
if (s$ == game_nastr.wordin$)
cn_p$ = true;
break;
end;
end;


How it is possible to accelerate such check?

[PointOfLight]

Were you doing this on a PC or PPC?* I just tried the program on my PC, and put a messagebox in at the end of the loop, and the messagebox pops up almost immediately after it's done compiling.

[PointOfLight]

Well, I answered my own question.* It was a PPC problem.* Don't know why it does what it does, but here's a solution:

s$ = words_spr$[i$];
s$ = upper(s$);

For some reason, it seems a lot happier doing a call to upper on a regular variable than on an array element.

[kornalius]

I will look into this one, it should be slower normally.

[relo]

ok

[relo]

reading string problem. :)

[kornalius]

Relo, I have fixed the problem in 1.40 beta 1.