diff options
Diffstat (limited to 'src/sail_lib.ml')
| -rw-r--r-- | src/sail_lib.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/sail_lib.ml b/src/sail_lib.ml index 22f55e62..28015945 100644 --- a/src/sail_lib.ml +++ b/src/sail_lib.ml @@ -1136,4 +1136,4 @@ let rand_zunit (g : 'generators) : unit = () let rand_choice l = let n = List.length l in - fun () -> (List.nth l (Random.int n)) + List.nth l (Random.int n) |