XOR swap/exchange: nowadays an almost extinct means to exchange two distinct variable

[DP News-Robot]

Almost a year ago, a thread on “premature Delphi optimization” came by on G+ about this code: procedure ExchangeInteger(var AValue1, AValue2: Integer); begin AValue1 := AValue1 xor AValue2; AValue2 := AValue1 xor AValue2; AValue1 := AValue1 xor AValue2; end; I don’t think ...

More...