@@ -202,7 +202,7 @@ module Gen : sig
202
202
203
203
val nat : int t (* * Generates small natural numbers. *)
204
204
205
- val big_nat : int t (* * Generates natural numbers, possibly large. @since NEXT_RELEASE *)
205
+ val big_nat : int t (* * Generates natural numbers, possibly large. @since 0.10 *)
206
206
207
207
val neg_int : int t (* * Generates non-strictly negative integers (0 included). *)
208
208
@@ -297,7 +297,7 @@ module Gen : sig
297
297
298
298
val small_array : 'a t -> 'a array t
299
299
(* * Generates arrays of small size (see {!small_nat}).
300
- @since NEXT_RELEASE *)
300
+ @since 0.10 *)
301
301
302
302
val join : 'a t t -> 'a t
303
303
(* * Collapses a generator of generators to simply a generator.
@@ -469,11 +469,11 @@ module Shrink : sig
469
469
470
470
val list_spine : 'a list t
471
471
(* * Try to shrink lists by removing one or more elements.
472
- @since NEXT_RELEASE *)
472
+ @since 0.10 *)
473
473
474
474
val list_elems : 'a t -> 'a list t
475
475
(* * Shrinks the elements of a list, without changing the list size.
476
- @since NEXT_RELEASE *)
476
+ @since 0.10 *)
477
477
478
478
val array : ?shrink : 'a t -> 'a array t
479
479
(* * Shrink an array.
@@ -626,7 +626,7 @@ module TestResult : sig
626
626
type 'a failed_state = 'a counter_ex list
627
627
628
628
(* * Result state.
629
- changed in NEXT_RELEASE (move to inline records, add Fail_other) *)
629
+ changed in 0.10 (move to inline records, add Fail_other) *)
630
630
type 'a state =
631
631
| Success
632
632
| Failed of {
@@ -662,7 +662,7 @@ module TestResult : sig
662
662
663
663
val warnings : _ t -> string list
664
664
(* * Obtain list of warnings
665
- @since NEXT_RELEASE *)
665
+ @since 0.10 *)
666
666
667
667
val is_success : _ t -> bool
668
668
(* * Returns true iff the state if [Success]
@@ -709,7 +709,7 @@ module Test : sig
709
709
The fraction should be between 0. and 1.
710
710
A warning will be emitted otherwise if
711
711
the flag is [`Warning], the test will be a failure if the flag is [`Fatal].
712
- (since NEXT_RELEASE )
712
+ (since 0.10 )
713
713
*)
714
714
715
715
val get_arbitrary : 'a cell -> 'a arbitrary
0 commit comments