http://www.adaconcept.com/programs/limited_with/lista2.ads
limited with Lista1; -- Ada 2005 -tol csak az "incomplete type" -okat teszi lathatova. Nem kotelezo mindket csomagban kiirni a limited kulcsszot, de az ertelmezest nagy mertekben megkonnyitheti.
package Lista2 is
type Elem_Tipus; -- tipusnevkent deklaraljuk az Elem_Tipus -t, "incomplete type"
type Elem_Mutato_Tipus is access Elem_Tipus;
type Elem_Tipus is record
Kovetkezo : Elem_Mutato_Tipus;
Par : access Lista1.Elem_Tipus; -- nevtelen mutato tipus!!! (Ada 2005) hiszen a mutatott tipus meretet nem ismerjuk
end record;
end Lista2;