shithub: mc

ref: 90d9a10c0234f5868c2e86882aae72fc931d53fd
dir: /lib/std/cstrconv.myr/

View raw version
use "types"

pkg std =
	const cstrlen	: (buf : byte[:] -> size)
	const cstrconv	: (buf : byte[:] -> byte[:])
	const cstrconvp	: (p : byte# -> byte[:])
;;

const cstrconv = {buf
	for var i = 0; i < buf.len; i++
		if buf[i] == 0
			-> buf[:i]
		;;
	;;
	-> buf
}

const cstrconvp = {p
	var len

	len = 1
	while p[:len][len -1] != 0
		len++
	;;
	-> p[:len-1]
}

const cstrlen = {buf
	for var i = 0; i < buf.len; i++
		if buf[i] == 0
			-> i
		;;
	;;
	-> 0
}