diff options
| author | Brian Campbell | 2018-10-03 12:25:34 +0100 |
|---|---|---|
| committer | Brian Campbell | 2018-10-03 12:25:34 +0100 |
| commit | f0d2765b19f710608153702303a20cbf0d342ed9 (patch) | |
| tree | 479a2a038e00ae57bb009364d2e75dafdabfb0cf /src/sail_lib.ml | |
| parent | 9cd621d347b7d6082dc640adc24b7809fd2dab39 (diff) | |
Drop unnecessary thunking; more trouble than it's worth
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) |