(** C code. *)
type entry_point = {
- (*ep_loc : Camlp4.PreCast.Loc.t;*)
+ ep_loc : Camlp4.PreCast.Loc.t;
ep_name : string;
ep_params : parameter list;
ep_return : return_type;
}
(** An API entry point. *)
+type api = {
+ api_entry_points : entry_point list;
+}
+(** This single structure describes the whole API. *)
+
val string_of_any_type : any_type -> string
val string_of_return_type : return_type -> string
val string_of_parameter : parameter -> string