Visitor (cobol_unit.Cobol

class 'a folder : object ... end

val fold_unit_config : 
  'a folder ->
  Cobol_unit__.Unit_types.unit_config ->
  'a ->
  'a

val fold_data_definitions : 
  'a folder ->
  Cobol_unit__.Unit_types.data_definitions ->
  'a ->
  'a

val fold_procedure_paragraph : 
  'a folder ->
  Cobol_unit__.Unit_types.procedure_paragraph ->
  'a ->
  'a

val fold_procedure_paragraph' : 
  'a folder ->
  Cobol_unit__.Unit_types.procedure_paragraph
    Cobol_common.Srcloc.TYPES.with_loc ->
  'a ->
  'a

val fold_procedure_section : 
  'a folder ->
  Cobol_unit__.Unit_types.procedure_section ->
  'a ->
  'a

val fold_procedure_section' : 
  'a folder ->
  Cobol_unit__.Unit_types.procedure_section Cobol_common.Srcloc.TYPES.with_loc ->
  'a ->
  'a

val fold_procedure_block : 
  'a folder ->
  Cobol_unit__.Unit_types.procedure_block ->
  'a ->
  'a

val fold_resolved_name : 
  fold:(('b folder as 'a) -> 'c -> 'b -> 'b) ->
  'd ->
  ('c, Cobol_ptree.name Cobol_common.Srcloc.TYPES.with_loc)
    Cobol_unit__.Unit_types.resolved_reference ->
  'b ->
  'b

val fold_procedure_arg : 
  'a folder ->
  Cobol_unit__.Unit_types.procedure_arg ->
  'a ->
  'a

val fold_procedure_using : 
  'a folder ->
  Cobol_unit__.Unit_types.procedure_arg Cobol_common.Srcloc.TYPES.with_loc list ->
  'a ->
  'a

val fold_procedure_using' : 
  'a folder ->
  Cobol_unit__.Unit_types.procedure_arg Cobol_common.Srcloc.TYPES.with_loc list
    Cobol_common.Srcloc.TYPES.with_loc ->
  'a ->
  'a

val fold_procedure : 'a folder -> Cobol_unit__.Unit_types.procedure -> 'a -> 'a

val fold_unit_env : 'a folder -> Cobol_unit__.Unit_types.unit_env -> 'a -> 'a

val fold_cobol_unit : 
  'a folder ->
  Cobol_unit__.Unit_types.cobol_unit ->
  'a ->
  'a

val fold_cobol_unit' : 
  'a folder ->
  Cobol_unit__.Unit_types.cobol_unit Cobol_common.Srcloc.TYPES.with_loc ->
  'a ->
  'a

val fold_unit_group : 
  'a folder ->
  Stdlib.Set.Make(Cobol_unit__.Unit_collections.M).t ->
  'a ->
  'a