shithub: mc

ref: 1b1439cd64f73986909b85c99c91c2195d4ab58f
dir: /lib/std/hassuffix.myr/

View raw version 
use "sleq"
pkg std =
	const hassuffix	: (s : byte[:], suff : byte[:] -> bool)
;;

const hassuffix = {s, suff
	var tail

	if suff.len <= s.len
		tail = s[s.len - suff.len:]
		-> sleq(tail, suff)
	;;
	-> false
}