summaryrefslogtreecommitdiff
path: root/lib/iter/ref.myr
blob: 45813c08d21371d80a4018c76fe9e563742df0d5 (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
use std

pkg iter =
	type refiter(@a) = struct
		idx	: std.size
		sl	: @a[:]
	;;
	impl iterable refiter(@a) -> @a#
	generic byref 	: (sl : @a[:] -> refiter(@a))
;;

generic byref = {a
	-> [.sl = a, .idx = 0]
}

impl iterable refiter(@a) -> @a# =
	__iternext__ = {itp, valp
		if itp.idx == itp.sl.len
			-> false
		;;
		valp# = &itp.sl[itp.idx]
		itp.idx++
		-> true
	}

	__iterfin__ = {itp, valp
	}
;;