ASM

[jbg]

Die folgende Prozedur vertaucht die Werte von a und b.

Code:

procedure SwapInt(var a, b: Integer); assembler;
asm
 // in: eax <-> @a
 // in: edx <-> @b
  push ebx
  mov ebx, [eax]
  mov ecx, [edx]
  mov [eax], ecx
  mov [edx], ebx
  pop ebx
end;