Hallo,

ich habe gerade meine alte VLInt auf Operatoren-Überladung umgestellt. Da sie nun nach einigen Schwierigkeiten mit BitwisAAnd (grr, Embacadero!) nach außen durch einfache Bedienbarkeit glänzt, will ich jetzt die inneren Werte aufpolieren und einige Prozeduren durch Assembler ersetzen.

Die Ziffern sind in einer TList namens FDigits mit der Basis 2^32 organisiert, 0 = nil, das Vorzeichen steckt in einem Boolean.

Meine alte TVLInt.Implicit sieht so aus:

markieren

Delphi-Quellcode:

class operator TVLInt.Implicit(const a: Cardinal): TVLInt;
begin
  Result.Create; // FDigits := TList.Create; FIsNegative := False;
  Result[0] := a; // FDigits[Ind] := Pointer(Val);
end;

Hier versammeln sich meine asm-Probleme: (Rechnen klappt teilweise schon ganz gut)

1. Das Anlegen von FDigits
2. Zuweisen von FDigits.Capacity
3. FDigits <= a

markieren

Delphi-Quellcode:

class operator TVLInt.Implicit(const a: Cardinal): TVLInt;
  asm
    // eax <= a

                             // mov [edx], eax ???

    // edx = @Result[0]
  end;

Kann mir vielleicht jemand zeigen, wie das geht?


Gruß Talia

Hallo,

Ganz ehrlich?
Du hast nichts davon.
Du wirst es mit Assembler nicht schneller bekommen.
Lass es einfach so

Gruß
Neutral General

Hallo, Herr General!

Ich will gar nicht unbedingt die schnellste VLInt des Planeten schreiben, ist bloß grundsätzliches, "akademisches" Interesse, wie sowas geht.

Gruß Talia

Hallo,

Habs jetzt auch nicht direkt hinbekommen.
Aber als Tipp:
Schreib den Code mal ganz normal in Delphi und setz dann nen Breakpoint auf die 1. Anweisung.
Wenn der Debugger anhält dann drück mal Strg+Alt+C.
Dann siehst du welcher Assembler-Code dahinter steckt!

Es gibt Codes, da hat man absolut nichts von Assembler, außer daß der Code eher unübersichtlicher wird.
Und diese eine Funktion gehört mit dazu.
Ob sich andere Methoden durch ASM optimieren lassen, kann man nicht sagen, da wir ja sonst noch nichts gesehn haben.

Wie ist denn Create definiert?
Entweder das ist ein Create und gibt den neuen "Integer" als Result zurück,
oder es sollte besser Init heißen ... so sieht es eher "falsch" aus,
jedenfalls wenn man es mit dem bekannten Create der Objekte vergleicht.

Hallo,

danke für den Strg+Alt+C - Tipp. Ich habe mich gerade durch Delphis asm-Umsetzung geF7t und finde jetzt auch, daß das Ganze eine blöde Idee war.

Ich werde nur die grundlegenden Rechnungen umschreiben, damit habe ich genug zu tun.

Create erzeugt übrigens nur eine leere Liste FDigits und setzt FIsNegative auf False. Den Teil werde ich nicht verändern.

Gruß Talia