mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-26 12:03:45 +02:00
8 lines
56 B
ObjectPascal
8 lines
56 B
ObjectPascal
|
|
{$R+}
|
|
var w:word;
|
|
s:Shortint;
|
|
begin
|
|
w := s;
|
|
end.
|