Re: Doubly linked list.

[stt@houdini.camb.inmet.com (Tucker Taft)]

Matt Tyler (matt_tyler@hotmail.com) wrote:

: I'm having trouble implementing a Doubly linked list in ada.

: My procedure to add a new singly linked record to the list is (body only)

: List:=new Box'(V,List);

: where V is an integer and List is an access type to box.

: I don't understand how to set another access type in the record to the
: previous record on the list. Can anyone help??

With a doubly linked list, each list element has both a "next" and
a "prev" component, in general.   You need to initialize both.  In
general, one will be null in the new element.

The following will accomplish the job:

    -- Insert on front of list
    List := new Box'(V, Next => List, Prev => null);  

    if List.Next /= null then
        -- Make old "first" element point back to new "first"
        List.Next.Prev := List;  
    end if;

: P.S is there a comp.lang.ada faq ???????????

Try www.adahome.com.

: Cheers,

: Matt Tyler

--
-Tucker Taft   stt@averstar.com   http://www.averstar.com/~stt/
Technical Director, Intermetrics, Inc.  Burlington, MA  USA
An AverStar Company (www.averstar.com)