shithub: mc

ref: 4fd18f1c27d3f1eba10c849a3c9cdb7d9dc33abc
dir: /lib/std/clear.myr/

View raw version
use "slfill"

pkg std =
	generic clear	: (p : @a#	-> void)
;;

generic clear = {p : @a#
	var bp

	bp = (p : byte#)
	slfill(bp[:sizeof(@a)], 0)
}