Ein Array schnell auf 0 Werte prüfen

[rawsoul]

Wie groß ist denn das Array? Ich hätte das ganze ohne IASM so gelöst:

Delphi-Quellcode:

type TIntArray=Array of Integer;
function IsEmptyArray(A:TIntArray):Boolean;
var
  I:Integer;
begin
  Result:=True;
  for I:=low(A) to high(A) do
    if A[I]<>0 then
    begin
      Result:=False;
      Break;
    end;
end;

[3_of_8]

Zitat:

Zitat von sirius

Zitat:

Zitat von 3_of_8

Natürlich, und es gibt ja keine anderen Maschinensprachen als IA-32. ;)

Zumindest wirds auf anderen Architekturen auch für Windows und Linux extrem schwer.

Windows vielleicht, aber Linux würde sogar auf meinen alten Socken laufen. ;)

[Tyrael Y.]

Hallo zusammen,

ich habe vorerst die Variante von sirius eingesetzt.
Ich werde bei Tests mal drauf achten, wie schnell es in der "Realität" sein wird.

Danke euch vielmals für die Anregungen und die Codes.


P.S: ...ein solches Array kann zwischen 6 Elementen und bisher bis zu 650000 Elementen beinhalten, es kommt immer auf die Situation an. Ich werde es wahrscheinlich nochmal leicht umschreiben und einen festen Array von der Größe 4096 nehmen. Muss halt mal bissel hin und her testen, um mich dem Optimum zu nähern.