summaryrefslogtreecommitdiff
path: root/lib/iter/enum.myr
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
	}
;;