Fehler bei C-Code-Übersetzung in Delphi

[Helmi]

Hallo,

wenn man den C-Code von dem Link nach Delphi übersetzen lässt, dann kommt es bei der Übersetzung zu einem Fehler:

Delphi-Quellcode:

{ ... }
function ByteBitWise.&shr(basic: Byte; n: Byte): Byte;  //<== Fehler: &shr
begin
  Result := (Byte((basic / Self.ext[(n and (8 - 1))])));
end;

function ByteBitWise.&shl(basic: Byte; n: Byte): Byte; //<== Fehler: &shl
begin
  Result := (Byte((basic * Self.ext[(n and (8 - 1))])));
end;
{ ... }