Module Java_base.Java_treeSource
module Astloc = Langs_common.AstlocSourceval set_loc : < data : < set_loc : L.Loc.t -> 'a.. >.. > -> L.Ast.Loc.t -> 'a Sourceval set_ghost_rec :
(< children : 'a array ; data : < set_loc : Loc.t -> 'b.. >.. > as 'a) ->
unit Sourceval get_orig_lab_opt :
< data : < orig_lab_opt : Obj.t option.. >.. > ->
L.t option Sourceval get_orig_lab : < data : < orig_lab_opt : Obj.t option.. >.. > -> L.t Sourceval get_surrounding_classes_or_interfaces :
(< data : < _label : Obj.t.. > ; initial_parent : 'a.. > as 'a) ->
'a list Sourceval get_uqn : string -> string Sourceval get_fqn :
?strip:bool ->
string ->
(< data : < _label : Obj.t.. > ; initial_parent : 'a.. > as 'a) ->
L.t ->
string module Tree : sig ... endSourceval of_opt : ('a -> 'b) -> 'a option -> 'b list Sourceval set_nodes_loc :
< data : < set_loc : Loc.t -> unit.. >.. > ->
< data : < src_loc : Loc.t.. >.. > list ->
unit Sourceval apply_child :
(L.t -> bool) ->
((< data : < _label : Obj.t.. >.. > as 'a) -> unit) ->
'a array ->
unit Sourceval vdid_to_id : string -> string Sourceval strip_vdid : (string * 'a) -> string * 'a Sourceval set_control_flow :
< initial_children :
(< data :
< _label : Obj.t
; add_successor : 'a -> unit
; get_ordinal : int -> int.. >
; initial_children : 'a array
; initial_nchildren : int.. > as 'a)
array
; initial_nchildren : int.. > ->
unit Sourceval compare_node_sig :
?reverse:bool ->
< data : < _label : Obj.t ; label : 'a.. >.. > ->
< data : < _label : Obj.t ; label : 'a.. >.. > ->
int