shithub: mc

ref: 87b9d6012af6af199b8304c67d2dbcf2365fd649
dir: /libstd/slcp.myr/

View raw version 
use "die.use"

pkg std =
	generic slcp : (a : @a[:], b : @a[:] -> void)
;;

generic slcp = {a, b
	var i

	assert(a.len == b.len, "arguments to slcp() must be of equal length")

	for i = 0; i < a.len; i++
		a[i] = b[i]
	;;
}