shithub: mc

ref: f82ca04d8d3197afd59f0e791fb7535265f5dac0
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]
	;;
}