mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-08 01:08:07 +02:00
13 lines
163 B
ObjectPascal
13 lines
163 B
ObjectPascal
program Project1;
|
|
|
|
{$mode objfpc}{$H+}
|
|
|
|
var
|
|
i: integer platform;
|
|
begin
|
|
{$warn symbol_platform off}
|
|
i := 1;
|
|
{$warn symbol_platform off}
|
|
i := 2;
|
|
end.
|