sig type pattern val make_pattern : string -> Netaux.KMP.pattern val find_pattern : Netaux.KMP.pattern -> ?pos:int -> ?len:int -> Stdlib.Bytes.t -> int end