Up

module Parse_bytecode

: sig
#
module Debug : sig
#
type data
#
val no_data : unit -> data
#
val find_loc : data -> ?after:bool -> int -> Parse_info.t option
end
#
val from_channel : ?toplevel:bool -> ?debug:[
| `Full
| `Names
| `No
] -> Pervasives.in_channel -> Code.program * Util.StringSet.t * Debug.data
#
val from_string : string array -> string -> Code.program * Debug.data
end