Skip to content

Commit

Permalink
Rpc_genfake.gentest: move comment to docstring
Browse files Browse the repository at this point in the history
Signed-off-by: Edwin Török <edwin.torok@cloud.com>
  • Loading branch information
edwintorok committed Sep 25, 2024
1 parent 435087b commit cf00fd3
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/lib/rpc_genfake.ml
Original file line number Diff line number Diff line change
Expand Up @@ -13,8 +13,6 @@ end

module Seen = Set.Make(SeenType)

(* don't use this on recursive types! *)

let rec gentest : type a. Seen.t -> a typ -> a list =
fun seen t ->
let seen_t = SeenType.T t in
Expand Down Expand Up @@ -259,5 +257,7 @@ let rec gen_nice : type a. a typ -> string -> a =
v.treview content)
| Abstract { test_data; _ } -> List.hd test_data

(** don't use this on recursive types! *)
let gentest t = gentest Seen.empty t

let genall t = genall Seen.empty t

0 comments on commit cf00fd3

Please sign in to comment.