aboutsummaryrefslogtreecommitdiff
path: root/lib/fixture.ml
diff options
context:
space:
mode:
authorMarc Coquand <marc@mccd.space>2023-12-26 09:25:58 -0600
committerMarc Coquand <marc@mccd.space>2023-12-26 09:57:19 -0600
commit8ac0e27adc8d14a77427351dede1757999c8c709 (patch)
tree21136e7f4e467c9441176358ac0af7421e332fdf /lib/fixture.ml
parentcb124a87d8ed1a309b00c9163cde2911ee029251 (diff)
downloadfixgen-8ac0e27adc8d14a77427351dede1757999c8c709.tar.gz
fixgen-8ac0e27adc8d14a77427351dede1757999c8c709.tar.bz2
fixgen-8ac0e27adc8d14a77427351dede1757999c8c709.zip
Support many newlines
Diffstat (limited to 'lib/fixture.ml')
-rw-r--r--lib/fixture.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/fixture.ml b/lib/fixture.ml
index 31a6e9c..189d2fb 100644
--- a/lib/fixture.ml
+++ b/lib/fixture.ml
@@ -22,6 +22,8 @@ let names =
let random_name () = List.nth names (Random.int (List.length names))
let%test "random_name" = List.mem (random_name ()) names
+(* Support arbitrary amount *)
+(* Support names *)
type t =
| Name of string
| Uuidv4 of string