[inferbo] Remove dangling file

Reviewed By: skcho

Differential Revision: D20034813

fbshipit-source-id: 448909c20
master
Ezgi Çiçek 5 years ago committed by Facebook Github Bot
parent e334647db8
commit dcb3ab1288

@ -1,23 +0,0 @@
(*
* Copyright (c) Facebook, Inc. and its affiliates.
*
* This source code is licensed under the MIT license found in the
* LICENSE file in the root directory of this source tree.
*)
open! IStd
type t = unit -> int
let make : int -> t =
fun init ->
let num_ref = ref init in
let get_num () =
let v = !num_ref in
num_ref := v + 1 ;
v
in
get_num
let next : t -> int = fun counter -> counter ()

@ -1,14 +0,0 @@
(*
* Copyright (c) Facebook, Inc. and its affiliates.
*
* This source code is licensed under the MIT license found in the
* LICENSE file in the root directory of this source tree.
*)
open! IStd
type t
val make : int -> t
val next : t -> int
Loading…
Cancel
Save