Changeset 051bc69a in mainline for uspace/dist/src/sysel/lib/list.sy
- Timestamp:
- 2010-05-08T08:10:44Z (15 years ago)
- Branches:
- lfn, master, serial, ticket/834-toolchain-update, topic/msim-upgrade, topic/simplify-dev-export
- Children:
- 640ffe6, c5cb943d
- Parents:
- 25a76ab8
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
uspace/dist/src/sysel/lib/list.sy
r25a76ab8 r051bc69a 31 31 var head : ListNode/t; 32 32 33 -- Initializelist.34 fun Init() is33 -- New empty list. 34 new() is 35 35 head = new ListNode/t(); 36 36 head.prev = head; … … 46 46 47 47 n = new ListNode/t(); 48 n. value= data;48 n.data = data; 49 49 50 50 n.prev = ntl; … … 74 74 75 75 class ListNode/t is 76 var value: t;76 var data : t; 77 77 78 78 var prev : ListNode/t; … … 80 80 var head : ListNode/t; 81 81 82 -- Valuestored in this node.83 prop Value: t is82 -- Data stored in this node. 83 prop Data : t is 84 84 get is 85 return value;85 return data; 86 86 end 87 87 end … … 99 99 return get_next(); 100 100 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; 101 114 end 102 115
Note:
See TracChangeset
for help on using the changeset viewer.