Re: Linked List within a record?

[Jerome Desquilbet <jDesquilbet@Rational.COM>]

Alvin A Begaye wrote:
> 
> Why won't this work
> 
> package MyList is new gen_linked_list( Integer, "=" );
> 
> type arggh is record
>   ID          : Integer;
>   IntList     : MyList.List;
> end record;
> 
> when i compile i get. completion of nonlimited type cannot be limited.
> 
> is there a way to do this?
> 
> --
> Alvin Al Begaye -*- (520)523-7875 -*- aab@pine.cse.nau.edu

I understand that your Gen_Linked_List generic package declares the
generic type Gen_Linked_List.List formal parameter as being limited
private. In that case, you can't use it as a record component type
(assignment issues). The only workaround is to use an access to this
type. Like this:

    type List_Access_Type is access MyList.List;
    type Hggra is
        record
            Id              : Integer;
            Int_List_Access : List_Access_Type;
        end record;

Of course, you'll have a manage your self allocations and deallocations
of objects of type List_Access_Type.

  Jerome.