Commit 4386b36f authored by Pietro Abate's avatar Pietro Abate
Browse files

[r2004-06-28 17:33:38 by afrisch] Forgot those ones

Original author: afrisch
Date: 2004-06-28 17:33:38+00:00
parent 618656fa
let nb_ext_syms = ref 0
let alloc () =
let i = !nb_ext_syms in
incr nb_ext_syms;
i
let nb () = !nb_ext_syms
let resolve = ref (fun i s args -> assert false)
val alloc : unit -> int
val nb: unit -> int
val resolve: ref (int -> string -> Types.Node.t list -> Types.t)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment