mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-12 17:49:33 +02:00
16 lines
159 B
ObjectPascal
16 lines
159 B
ObjectPascal
program ByteCompilerError;
|
|
|
|
|
|
{$Q+}
|
|
|
|
function NativeGetHashBytes: Byte;
|
|
var
|
|
LBitSize: Int64;
|
|
bob: byte;
|
|
begin
|
|
bob := LBitSize and $FF;
|
|
end;
|
|
|
|
begin
|
|
end.
|