Unsafe.PeekSimilar to Consume.To_*, but do not advance the buffer.
module To_bytes :
Core.Blit.S1_phantom2_distinct
with type (_, 'seek, 'loc) src := ('seek, 'loc) src
with type (_, _, _) dst := Core.Bytes.tmodule To_bigstring :
Core.Blit.S1_phantom2_distinct
with type (_, 'seek, 'loc) src := ('seek, 'loc) src
with type (_, _, _) dst := Core.Bigstring.tmodule To_string : sig ... endtype ('a, 'd, 'w, 'l) t = ('d, 'w, 'l) t @ local -> (pos:int -> 'a) @ localtype ('a, 'd, 'w, 'l) t__local =
('d, 'w, 'l) t @ local ->
(pos:int ->
'a @ local) @ localval char : (char, 'd, 'w, 'l) tval int8 : (int, 'd, 'w, 'l) tval int16_be : (int, 'd, 'w, 'l) tval int16_le : (int, 'd, 'w, 'l) tval int32_be : (int, 'd, 'w, 'l) tval int32_le : (int, 'd, 'w, 'l) tval int64_be_exn : (int, 'd, 'w, 'l) tval int64_le_exn : (int, 'd, 'w, 'l) tval int64_be_trunc : (int, 'd, 'w, 'l) tval int64_le_trunc : (int, 'd, 'w, 'l) tval uint8 : (int, 'd, 'w, 'l) tval uint16_be : (int, 'd, 'w, 'l) tval uint16_le : (int, 'd, 'w, 'l) tval uint32_be : (int, 'd, 'w, 'l) tval uint32_le : (int, 'd, 'w, 'l) tval uint64_be_exn : (int, 'd, 'w, 'l) tval uint64_le_exn : (int, 'd, 'w, 'l) tval int64_t_be : (Core.Int64.t, 'd, 'w, 'l) tval int64_t_le : (Core.Int64.t, 'd, 'w, 'l) tval head_padded_fixed_string :
padding:char ->
len:int ->
(string, 'd, 'w, 'l) tval tail_padded_fixed_string :
padding:char ->
len:int ->
(string, 'd, 'w, 'l) tval string : str_pos:int -> len:int -> (string, 'd, 'w, 'l) tval bytes : str_pos:int -> len:int -> (Core.Bytes.t, 'd, 'w, 'l) tval bigstring : str_pos:int -> len:int -> (Core.Bigstring.t, 'd, 'w, 'l) tval stringo :
?str_pos:int @ local ->
(?len:int @ local ->
(string, 'd, 'w, 'l) t @ local) @ localval byteso :
?str_pos:int @ local ->
(?len:int @ local ->
(Core.Bytes.t, 'd, 'w, 'l) t @ local) @ localval bigstringo :
?str_pos:int @ local ->
(?len:int @ local ->
(Core.Bigstring.t, 'd, 'w, 'l) t @ local) @ localmodule Local : sig ... endmodule Int_repr : sig ... endval index_or_neg :
([> Core.read ], _, _) t @ local ->
(?pos:int @ local ->
(?len:int @ local ->
(char ->
int) @ local) @ local) @ localLike Peek.index but with no bounds checks, and returns a negative number rather than None when the character is not found.
val rindex_or_neg :
([> Core.read ], _, _) t @ local ->
(?pos:int @ local ->
(?len:int @ local ->
(char ->
int) @ local) @ local) @ localLike Peek.rindex but with no bounds checks, and returns a negative number rather than None when the character is not found.