Das höchstwertige Bit ausblenden
.. ist Schwachsinn, da Integer-Zahlen 2k-codiert sind.
Was mir momentan einfällt:
Delphi-Quellcode:
function AbsAsm(A: Integer): Integer;
asm
cmp eax, 0
jge @@ende
neg eax
@@ende:
end;
Kann aber gut sein, dass es da noch was optimierteres gibt.
@himitsu: Dein Code funktioniert bei mir aber auch nicht richtig...
Hab mal nachgeguckt.. Hast bei deinem Code was vergessen:
Delphi-Quellcode:
function AbsAsm2(A: Integer): Integer;
asm
cdq
xor eax, edx
sub eax, edx
end;
So gehts auch!
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."