Compiler-Fehler: "Downto" statt "To"

[gordon freeman]

Hi Leute,

hab mir gerade mal die Werte von i in:

Delphi-Quellcode:

var BA : array[97..252] of integer;

(...)

procedure TForm2.BALeeren;
var i:integer;
begin
  for i:=97 to 252 do
    BA[i] := 0;
end;

angesehen.

Hab Strg+Alt+W gedrückt und die Variable i eingetragen. Als ersten Wert wird i mit 156 belegt. Und dann wird i runtergezählt auf 0!!!
Was stimmt denn jetzt wieder nicht

Dazu muss ich aber sagen, dass die Prozedur perfekt arbeitet, dass heißt, im gesamten Array steht im Endeffekt 0.

[mirage228]

Hi,

das liegt an der Compiler Optimierung. Rückwärtszählen geht schneller als vorwärtszählen und wenn es egal ist, wie rum gezählt wird, zählt der Delphi Compiler (bei eingeschalteter) Optimierung rückwärts.

mfG
mirage228

[jfheins]

Das ist die Compileroptimierung. der mach daraus das:

Delphi-Quellcode:

for i:=156 downto 0 do 
    BA[i + 97] := 0;

Weils runterzählen einfach schneller geht ...

[gordon freeman]

Okay, wieder was gelernt, thx!

[alcaeus]

Da muss ich kurz korrigieren:

Zitat von jfheins:

Weils runterzählen einfach schneller geht ...

Das Zählen geht genausoschnell. Allerdings ist ein Vergleich auf 0 schneller als ein Vergleich auf 156, und deshalb wird der Code so optimiert.

Greetz
alcaeus

[mirage228]

Zitat von alcaeus:

Da muss ich kurz korrigieren:

Zitat von jfheins:

Weils runterzählen einfach schneller geht ...

Das Zählen geht genausoschnell. Allerdings ist ein Vergleich auf 0 schneller als ein Vergleich auf 156, und deshalb wird der Code so optimiert.

Greetz
alcaeus

Ok, dann könnte man es so formulieren:

Das Rückwätszählen läuft schneller ab, weil ein Vergleich auf 0 schneller ist, als auf eine andere Zahl.

mfG
miraqe228

[jfheins]

Ich glaube aberZeroMemory (@BA, length (BA) * SizeOf (Integer)) könnte fast noch schneller sein ...

[Chewie]

Zitat von mirage228:

Ok, dann könnte man es so formulieren:

Das Rückwätszählen läuft schneller ab, weil ein Vergleich auf 0 schneller ist, als auf eine andere Zahl.

Nein. Aber wenn durch eine Rechenoperation ein Register den Wert 0 erhält, wird das Zero-Flag automatisch gesetzt. Dadurch spart man sich ein CMP.

[semo]

optimierung abstellen ist der erfahrung nach das beste

[Binärbaum]

Zitat von computer-glossar.de:

optimierung abstellen ist der erfahrung nach das beste

Wozu soll das den gut sein?
Ob so eine Schleife nun vor- oder rückwärts läuft, macht in dem vorgestellten Fall keinen Unterschied.

MfG
Binärbaum