shithub: mc

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