Source position: lresources.pp line 555
procedure ReverseByteOrderInWords(
p: PWord;
Count: Integer
);