(2)
formal_access_type_definition ::= access_type_definition
(7)
-- the formal types of the generic package
(8)
generic
type Node is private;
type Link is access Node;
package P is
...
end P;
(9)
-- can be matched by the actual types
(10)
type Car;
type Car_Name is access Car;
(11)
type Car is
record
Pred, Succ : Car_Name;
Number : License_Number;
Owner : Person;
end record;
(12)
-- in the following generic instantiation
(13)
package R is new P(Node => Car, Link => Car_Name);
-- Email comments, additions, corrections, gripes, kudos, etc. to: