let _f () =
  let h = Hashtbl.create 18 in
  if None = None then h else h
(*
let f () =
  let open Base in
  let h = Hashtbl.create (module Int) in
  h *)


type _t1 = { xxx : int ref }
type _t2 = { xxx : int Base.ref }

let last_identity = ref 0

let get_unique_identity_code () =
  let code = !last_identity in
  last_identity := code + 1;
  code

module BindsMap = Map.Make(String)
type env = int option ref BindsMap.t

type args = { mutable count: int }
