shithub: mc

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