mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-07 01:33:23 +02:00
18 lines
256 B
ObjectPascal
18 lines
256 B
ObjectPascal
unit tunit_order_test;
|
|
|
|
{$mode objfpc}{$H+}
|
|
|
|
interface
|
|
|
|
uses
|
|
unit_order_a, unit_order_b;
|
|
|
|
implementation
|
|
|
|
begin
|
|
unit_order_b.v{declaration:unit_order_b.v}:=3;
|
|
v{declaration:unit_order_b.v}:=3;
|
|
unit_order_a.v{declaration:unit_order_a.v}:='3';
|
|
end.
|
|
|