shithub: mc

ref: 4bff4b0a1771d2b450feceb3c2177d76c3adb504
dir: /libstd/slfill.myr/

View raw version
pkg std =
	generic slfill	: (sl : @a[:], v : @a	-> @a[:])
;;

generic slfill = {sl, v
	var i

	for i = 0; i < sl.len; i++
		sl[i] = v
	;;
	-> sl
}