blob: e59a0ae3f28168785b6aaf8fbb0ea9ed407d608e (
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
|
use std
pkg iter =
type enumiter(@a) = struct
idx : std.size
sl : @a[:]
;;
impl iterable enumiter(@a) -> (std.size, @a)
generic byenum : (a : @a[:] -> enumiter(@a))
;;
generic byenum = {a
-> [.sl = a, .idx = 0]
}
impl iterable enumiter(@a) -> (std.size, @a) =
__iternext__ = {itp, valp
if itp.idx == itp.sl.len
-> false
;;
valp# = (itp.idx, itp.sl[itp.idx])
itp.idx++
-> true
}
__iterfin__ = {itp, valp
}
;;
|
