shithub: mc

ref: ad5711a80b9aad68050dfb4ae1035e25d7d51942
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
}