File: memset.ha

package info (click to toggle)
harec 0.24.2-5
  • links: PTS, VCS
  • area: main
  • in suites: sid, trixie
  • size: 1,412 kB
  • sloc: ansic: 20,221; asm: 247; makefile: 118; lisp: 80; sh: 45
file content (6 lines) | stat: -rw-r--r-- 142 bytes parent folder | download 
1
2
3
4
5
6
 
export fn memset(dest: *opaque, val: u8, amt: size) void = {
	let a = dest: *[*]u8;
	for (let i = 0z; i < amt; i += 1) {
		a[i] = val;
	};
};