mirror of
https://github.com/c-cube/ocaml-containers.git
synced 2025-12-06 11:15:31 -05:00
changed comments, add _tags file
This commit is contained in:
parent
fcd2085190
commit
1beab5268b
3 changed files with 4 additions and 3 deletions
|
|
@ -50,7 +50,7 @@ let finish s =
|
||||||
|
|
||||||
let apply f x = finish (f x init)
|
let apply f x = finish (f x init)
|
||||||
|
|
||||||
(** {2 Combinateurs} *)
|
(** {2 Combinators} *)
|
||||||
|
|
||||||
let int_ i s = _combine s (Int64.of_int i)
|
let int_ i s = _combine s (Int64.of_int i)
|
||||||
let bool_ x s = _combine s (if x then 1L else 2L)
|
let bool_ x s = _combine s (if x then 1L else 2L)
|
||||||
|
|
|
||||||
|
|
@ -53,8 +53,8 @@ OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
||||||
of this memory structure, cheaply and repeatably. *)
|
of this memory structure, cheaply and repeatably. *)
|
||||||
|
|
||||||
type +'a t = ('a -> unit) -> unit
|
type +'a t = ('a -> unit) -> unit
|
||||||
(** Sequence abstract iterator type, representing a finite sequence of
|
(** Sequence iterator type, representing a finite sequence of values
|
||||||
values of type ['a]. *)
|
of type ['a] that one can iterate on. *)
|
||||||
|
|
||||||
type +'a sequence = 'a t
|
type +'a sequence = 'a t
|
||||||
|
|
||||||
|
|
|
||||||
1
core/_tags
Normal file
1
core/_tags
Normal file
|
|
@ -0,0 +1 @@
|
||||||
|
<CCHash.*>: inline(20)
|
||||||
Loading…
Add table
Reference in a new issue