shithub: mc

ref: d52fd3b32109f12e529a7f5e380c5ee8f06aefcf
dir: /lib/iter/ref.myr/

View raw version 
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
	}
;;