ASM vs Delphi

[Kryoko]

Hi.

Wollte mal wissen was schneller ist :

Delphi-Quellcode:

function VectorSetValue(const Value:Single): TVector3D;
begin
  Result.X := Value;
  Result.Y := Value;
  Result.Z := Value  
end;

oder

Delphi-Quellcode:

function VectorSetValue(const Value:Single): TVector3D;
asm
  FLD Value
  FSTP Result.X
  FLD Value
  FSTP Result.Y
  FLD Value
  FSTP Result.Z
end;

Jemand ne Idee ?

[SirThornberry]

führe das ganze in einer Schleife 1 000 000 mal aus und messe die zeit, dann weißt du es genau

[sakura]

Zitat:

Zitat von SirThornberry

führe das ganze in einer Schleife 1 000 000 mal aus und messe die zeit, dann weißt du es genau

Und anschließend teste noch folgende, welche imo die schnellste sein sollte:

Delphi-Quellcode:

function VectorSetValue(const Value:Single): TVector3D;
asm
  mov edx, Value
  mov [eax], edx
  mov [eax + $04], edx
  mov [eax + $08], edx
end;

Deren Ergebnis ist i.A. identisch zur Pascal-Lösung, verzichtet aber auf das wiederholte Laden des Übergabewertes.

Deine Lösung sollte spürbar langsamer sein, da Du auf die Befehle des Co-Prozessor zurückgreifst, während der Code von Delphi ohne diesen auskommt und einfach die Speicherwerte kopiert :zwinker:

...:cat:...

[Kryoko]

humm...je mehr es wird desto geringer später der unterschied...naja...asm ist erstmal schneller -
:P

[_Sebastian_]

Zitat:

Zitat von SirThornberry

führe das ganze in einer Schleife 1 000 000 mal aus und messe die zeit, dann weißt du es genau

optimiert da nicht der kompiler dazwischen wenn man das einfach so inner schleife ablaufen lässt?

[sakura]

Zitat:

Zitat von Kryoko

humm...je mehr es wird desto geringer später der unterschied...naja...asm ist erstmal schneller -
:P

Kann ich nicht bestätigen, aber ich weiß auch nicht wie Du gemessen hast. Anbei mal eine Sample-App mit den drei Methoden. Delphis (1) und meine (3) sind nahezu identisch, Deine (2) ca. 60% langsamer.

...:cat:...

[sakura]

Zitat:

Zitat von _Sebastian_

optimiert da nicht der kompiler dazwischen wenn man das einfach so inner schleife ablaufen lässt?

Nicht bei Funktionsaufrufen, aber schau mal in meine Lösung, die garantiert dass da nix mit Optimierung läuft ;-)

...:cat:...

[Oxmyx]

Zitat:

Zitat von Kryoko

humm...je mehr es wird desto geringer später der unterschied...naja...asm ist erstmal schneller -
:P

Delphi erzeugt auch nur Assemblercode, und bei einer einfachen Zuweisung würde ich dem Delphi-Compiler vertrauen, dass der effizienteste Code erzeugt wird.

[sakura]

Zitat:

Zitat von Oxmyx

und bei einer einfachen Zuweisung würde ich dem Delphi-Compiler vertrauen, dass der effizienteste Code erzeugt wird.

Er hat aber eine dreifache Zuweisung der gleichen Variablen und hier hat Delphi einen Nachteil, es lädt die Variable auch drei Mal :roll: Ansonsten ist Delphi in diesem Fall aber wirklich viel schneller, da einfach nur Speicher kopiert wird und nicht auf Co-Prozessor Befehle gesetzt wird.

...:cat:...

[dizzy]

Gibt es zu FSTP nicht auch die Variante ohne "Pop"? Dann ließe sich das ewige nachladen verhindern.