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