package diffast-langs-java
Module Java_base.Java_unparsingSource
module Xlist = Diffast_misc.Xlistmodule Xchannel = Diffast_misc.Xchannelmodule UPB : sig ... endSource
val pr_node :
?fail_on_error:bool ->
?va:bool ->
?blk_style:UPB.block_style ->
?prec:int ->
(< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >
; initial_children : 'a array
; initial_parent :
< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >
; parent : < data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >.. > as 'a) ->
unitSource
val pr_selected :
?fail_on_error:bool ->
?pra:
(?head:(unit -> unit) ->
?tail:(unit -> unit) ->
(unit -> unit) ->
((< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >
; initial_children : 'a array
; initial_parent :
< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >
; parent :
< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >.. > as 'a) ->
unit) ->
'a array ->
unit) ->
?sep:(unit -> unit) ->
?head:(unit -> unit) ->
?tail:(unit -> unit) ->
?otherwise:(unit -> unit) ->
?blk_style:UPB.block_style ->
?prec:int ->
(L.t -> bool) ->
'a array ->
unitSource
val pr_types :
?fail_on_error:bool ->
(< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >
; initial_children : 'a
; initial_parent :
< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >
; parent : < data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >.. >
array as 'a) ->
unitSource
val pr_expressions :
?fail_on_error:bool ->
(unit -> unit) ->
(< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >
; initial_children : 'a array
; initial_parent :
< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >
; parent : < data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >.. > as 'a)
array ->
unitSource
val pr_arguments :
?fail_on_error:bool ->
(< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >
; initial_children : 'a
; initial_parent :
< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >
; parent : < data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >.. >
array as 'a) ->
unitSource
val pr_parameters :
?fail_on_error:bool ->
(< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >
; initial_children : 'a
; initial_parent :
< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >
; parent : < data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >.. >
array as 'a) ->
unitSource
val pr_typeparameters :
?fail_on_error:bool ->
(< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >
; initial_children : 'a
; initial_parent :
< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >
; parent : < data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >.. >
array as 'a) ->
unitSource
val pr_typearguments :
?fail_on_error:bool ->
?nth:int ->
(< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >
; initial_children : 'a
; initial_parent :
< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >
; parent : < data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >.. >
array as 'a) ->
unitSource
val pr_primary :
?fail_on_error:bool ->
?prec:int ->
L.Primary.t ->
(< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >
; initial_children : 'a
; initial_parent :
< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >
; parent : < data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >.. >
array as 'a) ->
unitSource
val pr_expression :
?fail_on_error:bool ->
?prec:int ->
L.Expression.t ->
(< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >
; initial_children : 'a
; initial_parent :
< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >
; parent : < data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >.. >
array as 'a) ->
unitSource
val unparse :
?no_boxing:bool ->
?no_header:bool ->
?fail_on_error:bool ->
(< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >
; initial_children : 'a array
; initial_parent :
< data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >
; parent : < data : < _label : Obj.t ; orig_lab_opt : Obj.t option.. >.. >.. > as 'a) ->
unit