blob: 11ba4e16610e518b5151d2dc8d90a92339536337 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
/##
Copyright 2021-2022 Kyle Gunger
Dual licensed under the CDDL 1.0 and BSD 3-Clause licenses.
This file may only be used in accordance with one of the two
licenses. You should have received a copy of each license with
the source code. In the event that you did not recieve a copy
of the licenses, they may be found at the following URLs:
CDDL 1.0:
https://opensource.org/licenses/CDDL-1.0
BSD 3-Clause:
https://opensource.org/licenses/BSD-3-Clause
THIS SOFTWARE/SOURCE CODE IS PROVIDED "AS IS" WITH NO
WARRANTY, GUARANTEE, OR CLAIM OF FITNESS FOR ANY PURPOSE
EXPRESS OR IMPLIED
#/
;struct LNode (type T) {
T data,
~void next
}
/; method LNode
/; get_next_type (type B) [LNode(B)]
;return (self.next)[~LNode(B)]`
;/
/; get_next [LNode(T)]
;return (self.next)[~LNode(T)]`
;/
;/
;struct DLNode (type T) extends LNode(T) {
super,
~void prev
}
/; method DLNode
/; get_prev_type (type B) [LNode(B)]
;return (self.prev)[~LNode(B)]`
;/
/; get_prev [LNode(T)]
;return (self.prev)[~LNode(T)]`
;/
;/
;struct List {
uint length,
LNode
first,
last
}
;struct DList {
uint length,
DLNode
first,
last
}
|