mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-12 16:29:27 +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.
|