package mutaml

You can search for identifiers within the package.

in-package search v0.2.0

mutaml
- Library mutaml.common
  - Mutaml_common
    
    Loc
- Library mutaml_ppx
  - Entry
    
    CLI
    
    Env
  - Mutaml_ppx
    
    Base_exp_context
    
    Pprintast
    
    Const
    
    Exp
    
    Pat
    
    Vb
    
    Options
    
    Match
    
    mutate_mapper
  - RS
- Sources
  - mutaml.common
    
    mutaml_common.ml
  - mutaml_ppx
    
    RS.ml
    
    entry.ml
    
    mutaml_ppx.ml

Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file `RS.ml`

1
2
3
4
5
6
(** A minimal RNG interface  *)
include Random4.State

let make_random_seed () = Random4.State.(bits (make_self_init ()))
let init seed = Random4.State.make [|seed|]
let int rs bound = int rs (bound+1)