mirror of
https://github.com/AdaCore/uwrap.git
synced 2026-02-12 13:06:34 -08:00
13 lines
162 B
Ada
13 lines
162 B
Ada
|
package Test is
|
||
|
|
|
||
|
|
V : Integer;
|
||
|
|
|
||
|
|
type A_Type is record
|
||
|
|
A, B : Integer;
|
||
|
|
end record;
|
||
|
|
|
||
|
|
procedure A_Procedure (P1, P2 : Integer) is null;
|
||
|
|
|
||
|
|
|
||
|
|
end Test;
|