let cache_dir = ref (get_env_default "BEN_CACHE_DIR" (Sys.getcwd ()))