Re: Record
From: Bruce Roberts (ber_at_bounceitattcanada.xnet)
Date: 10/28/04
- Next message: Marco van de Voort: "Re: Been a slice..."
- Previous message: Rob Kennedy: "Re: Try Finally..."
- In reply to: Profetas: "Record"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Date: Thu, 28 Oct 2004 12:37:07 -0400
"Profetas" <xuxu_18@yahoo.com> wrote in message
news:bfdf05c346d339ced65cc7cf8197dc02@localhost.talkaboutprogramming.com...
> Hi,
>
> How do I access the head and last from this structure?
>
> type
> LineElem = ^LineElemDesc;
> LineList = record head, last: LineElem
> END;
>
>
> LineElemDesc = record
> Line: INTEGER;
> next: LineElem;
> END;
>
> var
> list : LineElem;
>
> suppose I wante to create a list
var list : LineList;
> new(list);
> list^.next :=NIL;
> list^.line := line;
>
> I forgot how I access the head and last?
list.Head := nil;
list.Last := nil;
To add a record
var elem : LineElem;
new (elem);
if list.Last <> nil
then list.Last.Next := elem
else list.Head := elem;
list.Last := elem;
list.Last.Next := nil;
- Next message: Marco van de Voort: "Re: Been a slice..."
- Previous message: Rob Kennedy: "Re: Try Finally..."
- In reply to: Profetas: "Record"
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Relevant Pages
|