1pragma Default_Scalar_Storage_Order (High_Order_First);
2
3package SSO10_Pkg is
4
5  type Root is tagged null record;
6
7  procedure Run (R : Root) is null;
8
9end SSO10_Pkg;
10