Changeset 051bc69a in mainline for uspace/dist/src/sysel/lib/list.sy


Ignore:
Timestamp:
2010-05-08T08:10:44Z (15 years ago)
Author:
Jiri Svoboda <jiri@…>
Branches:
lfn, master, serial, ticket/834-toolchain-update, topic/msim-upgrade, topic/simplify-dev-export
Children:
640ffe6, c5cb943d
Parents:
25a76ab8
Message:

Update SBI to rev. 244.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • uspace/dist/src/sysel/lib/list.sy

    r25a76ab8 r051bc69a  
    3131        var head : ListNode/t;
    3232
    33         -- Initialize list.
    34         fun Init() is
     33        -- New empty list.
     34        new() is
    3535                head = new ListNode/t();
    3636                head.prev = head;
     
    4646
    4747                n = new ListNode/t();
    48                 n.value = data;
     48                n.data = data;
    4949
    5050                n.prev = ntl;
     
    7474
    7575class ListNode/t is
    76         var value : t;
     76        var data : t;
    7777
    7878        var prev : ListNode/t;
     
    8080        var head : ListNode/t;
    8181
    82         -- Value stored in this node.
    83         prop Value : t is
     82        -- Data stored in this node.
     83        prop Data : t is
    8484                get is
    85                         return value;
     85                        return data;
    8686                end
    8787        end
     
    9999                        return get_next();
    100100                end
     101        end
     102
     103        -- Remove node from list.
     104        fun Remove() is
     105                var p : ListNode/t;
     106                var n : ListNode/t;
     107
     108                p = prev; n = next;
     109                p.next = n;
     110                n.prev = p;
     111
     112                prev = nil;
     113                next = nil;
    101114        end
    102115
Note: See TracChangeset for help on using the changeset viewer.