1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
|
(*
* Copyright (C) 2006-2009 Citrix Systems Inc.
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU Lesser General Public License as published
* by the Free Software Foundation; version 2.1 only. with the special
* exception on linking described in file LICENSE.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Lesser General Public License for more details.
*)
module String :
sig
external length : string -> int = "%string_length"
(** blabla *)
external get : string -> int -> char = "%string_safe_get"
external set : string -> int -> char -> unit = "%string_safe_set"
external create : int -> string = "caml_create_string"
val make : int -> char -> string
val copy : string -> string
val sub : string -> int -> int -> string
val fill : string -> int -> int -> char -> unit
val blit : string -> int -> string -> int -> int -> unit
val concat : string -> string list -> string
val iter : (char -> unit) -> string -> unit
val index : string -> char -> int
val rindex : string -> char -> int
val index_from : string -> int -> char -> int
val rindex_from : string -> int -> char -> int
val contains : string -> char -> bool
val contains_from : string -> int -> char -> bool
val rcontains_from : string -> int -> char -> bool
val uppercase : string -> string
val lowercase : string -> string
val capitalize : string -> string
val uncapitalize : string -> string
type t = string
val compare : t -> t -> int
external unsafe_get : string -> int -> char = "%string_unsafe_get"
external unsafe_set : string -> int -> char -> unit
= "%string_unsafe_set"
external unsafe_blit : string -> int -> string -> int -> int -> unit
= "caml_blit_string" "noalloc"
external unsafe_fill : string -> int -> int -> char -> unit
= "caml_fill_string" "noalloc"
val of_char : char -> string
(** Make a string of the given length with characters generated by the
given function. *)
val init : int -> (int -> char) -> string
(** Map a string to a string. *)
val map : (char -> char) -> string -> string
(** Map a string to a string, applying the given function in reverse
order. *)
val rev_map : (char -> char) -> string -> string
(** Iterate over the characters in a string in reverse order. *)
val rev_iter : (char -> 'a) -> string -> unit
(** Fold over the characters in a string. *)
val fold_left : ('a -> char -> 'a) -> 'a -> string -> 'a
(** Iterate over the characters with the character index in argument *)
val iteri : (int -> char -> 'a) -> string -> unit
(** Iterate over the characters in a string in reverse order. *)
val fold_right : (char -> 'a -> 'a) -> string -> 'a -> 'a
(** Split a string into a list of characters. *)
val explode : string -> char list
(** Concatenate a list of characters into a string. *)
val implode : char list -> string
(** True if string 'x' ends with suffix 'suffix' *)
val endswith : string -> string -> bool
(** True if string 'x' starts with prefix 'prefix' *)
val startswith : string -> string -> bool
(** True if the character is whitespace *)
val isspace : char -> bool
(** Removes all the characters from the ends of a string for which the predicate is true *)
val strip : (char -> bool) -> string -> string
(** Backward-compatible string escaping, defaulting to the built-in
OCaml string escaping but allowing an arbitrary mapping from characters
to strings. *)
val escaped : ?rules:(char * string) list -> string -> string
(** Take a predicate and a string, return a list of strings separated by
runs of characters where the predicate was true *)
val split_f : (char -> bool) -> string -> string list
(** split a string on a single char *)
val split : ?limit:int -> char -> string -> string list
(** FIXME document me|remove me if similar to strip *)
val rtrim : string -> string
(** True if sub is a substr of str *)
val has_substr : string -> string -> bool
(** find all occurences of needle in haystack and return all their respective index *)
val find_all : string -> string -> int list
(** replace all [f] substring in [s] by [t] *)
val replace : string -> string -> string -> string
(** filter chars from a string *)
val filter_chars : string -> (char -> bool) -> string
(** map a string trying to fill the buffer by chunk *)
val map_unlikely : string -> (char -> string option) -> string
(** a substring from the specified position to the end of the string *)
val sub_to_end : string -> int -> string
end
|
