inherit Cobol_ptree__.Operands_visitor.folder
inherit Cobol_ptree__.Data_descr_visitor.folder
inherit Cobol_ptree__.Data_sections_visitor.folder
method fold_statement' : (Cobol_ptree__.PTree_types.statement
                            Cobol_ptree__.PTree_types.with_loc,
                           'a)
                           Cobol_common.Visitor.foldmethod fold_statements' : (Cobol_ptree__.PTree_types.statements
                             Cobol_ptree__.PTree_types.with_loc,
                            'a)
                            Cobol_common.Visitor.foldmethod fold_accept_misc : (Cobol_ptree__.PTree_types.accept_misc, 'a)
                            Cobol_common.Visitor.foldmethod fold_accept_clause' : (Cobol_ptree__.PTree_types.accept_clause
                                Cobol_ptree__.PTree_types.with_loc,
                               'a)
                               Cobol_common.Visitor.foldmethod fold_accept_with_clause' : (Cobol_ptree__.PTree_types.accept_with_clause
                                     Cobol_ptree__.PTree_types.with_loc,
                                    'a)
                                    Cobol_common.Visitor.foldmethod fold_allocate_kind : (Cobol_ptree__.PTree_types.allocate_kind, 'a)
                              Cobol_common.Visitor.foldmethod fold_alter_operands' : (Cobol_ptree__.PTree_types.alter_operands
                                 Cobol_ptree__.PTree_types.with_loc,
                                'a)
                                Cobol_common.Visitor.foldmethod fold_call_prefix : (Cobol_ptree__.PTree_types.call_prefix, 'a)
                            Cobol_common.Visitor.foldmethod fold_call_proto : (Cobol_ptree__.PTree_types.call_proto, 'a)
                           Cobol_common.Visitor.foldmethod fold_close_phrase : (Cobol_ptree__.PTree_types.close_phrase, 'a)
                             Cobol_common.Visitor.foldmethod fold_converting : (Cobol_ptree__.PTree_types.converting, 'a)
                           Cobol_common.Visitor.foldmethod fold_display_items_clauses : (Cobol_ptree__.PTree_types.display_items_clauses,
                                      'a)
                                      Cobol_common.Visitor.foldmethod fold_display_clause' : (Cobol_ptree__.PTree_types.display_clause
                                 Cobol_ptree__.PTree_types.with_loc,
                                'a)
                                Cobol_common.Visitor.foldmethod fold_display_target' : (Cobol_ptree__.PTree_types.display_target
                                 Cobol_ptree__.PTree_types.with_loc,
                                'a)
                                Cobol_common.Visitor.foldmethod fold_display_with_clause' : (Cobol_ptree__.PTree_types.display_with_clause
                                      Cobol_ptree__.PTree_types.with_loc,
                                     'a)
                                     Cobol_common.Visitor.foldmethod fold_entry_by_clause : (Cobol_ptree__.PTree_types.entry_by_clause, 'a)
                                Cobol_common.Visitor.foldmethod fold_evaluate_branch : (Cobol_ptree__.PTree_types.evaluate_branch, 'a)
                                Cobol_common.Visitor.foldmethod fold_init_data_category : (Cobol_ptree__.PTree_types.init_data_category,
                                   'a)
                                   Cobol_common.Visitor.foldmethod fold_init_replacing : (Cobol_ptree__.PTree_types.init_replacing, 'a)
                               Cobol_common.Visitor.foldmethod fold_inspect_spec : (Cobol_ptree__.PTree_types.inspect_spec, 'a)
                             Cobol_common.Visitor.foldmethod fold_inspect_where : (Cobol_ptree__.PTree_types.inspect_where, 'a)
                              Cobol_common.Visitor.foldmethod fold_merge_or_sort_target : (Cobol_ptree__.PTree_types.merge_or_sort_target,
                                     'a)
                                     Cobol_common.Visitor.foldmethod fold_named_file_option : (Cobol_ptree__.PTree_types.named_file_option,
                                  'a)
                                  Cobol_common.Visitor.foldmethod fold_open_phrase : (Cobol_ptree__.PTree_types.open_phrase, 'a)
                            Cobol_common.Visitor.foldmethod fold_read_error : (Cobol_ptree__.PTree_types.read_error, 'a)
                           Cobol_common.Visitor.foldmethod fold_replacing : (Cobol_ptree__.PTree_types.replacing, 'a)
                          Cobol_common.Visitor.foldmethod fold_replacing_clause : (Cobol_ptree__.PTree_types.replacing_clause, 'a)
                                 Cobol_common.Visitor.foldmethod fold_replacing_range_spec : (Cobol_ptree__.PTree_types.replacing_range_spec,
                                     'a)
                                     Cobol_common.Visitor.foldmethod fold_selection_object : (Cobol_ptree__.PTree_types.selection_object, 'a)
                                 Cobol_common.Visitor.foldmethod fold_selection_subject : (Cobol_ptree__.PTree_types.selection_subject,
                                  'a)
                                  Cobol_common.Visitor.foldmethod fold_send_operands : (Cobol_ptree__.PTree_types.send_operands, 'a)
                              Cobol_common.Visitor.foldmethod fold_set_condition_spec : (Cobol_ptree__.PTree_types.set_condition_spec,
                                   'a)
                                   Cobol_common.Visitor.foldmethod fold_set_switch_spec : (Cobol_ptree__.PTree_types.set_switch_spec, 'a)
                                Cobol_common.Visitor.foldmethod fold_status_kind : (Cobol_ptree__.PTree_types.status_kind, 'a)
                            Cobol_common.Visitor.foldmethod fold_stop_run_return : (Cobol_ptree__.PTree_types.stop_run_return, 'a)
                                Cobol_common.Visitor.foldmethod fold_stop_arg : (Cobol_ptree__.PTree_types.stop_arg, 'a)
                         Cobol_common.Visitor.foldmethod fold_string_delimiter : (Cobol_ptree__.PTree_types.string_delimiter, 'a)
                                 Cobol_common.Visitor.foldmethod fold_string_source : (Cobol_ptree__.PTree_types.string_source, 'a)
                              Cobol_common.Visitor.foldmethod fold_tallying : (Cobol_ptree__.PTree_types.tallying, 'a)
                         Cobol_common.Visitor.foldmethod fold_tallying_clause' : (Cobol_ptree__.PTree_types.tallying_clause
                                  Cobol_ptree__.PTree_types.with_loc,
                                 'a)
                                 Cobol_common.Visitor.foldmethod fold_tallying_spec : (Cobol_ptree__.PTree_types.tallying_spec, 'a)
                              Cobol_common.Visitor.foldmethod fold_unstring_delimiter : (Cobol_ptree__.PTree_types.unstring_delimiter,
                                   'a)
                                   Cobol_common.Visitor.foldmethod fold_unstring_target : (Cobol_ptree__.PTree_types.unstring_target, 'a)
                                Cobol_common.Visitor.foldmethod fold_varying_phrase : (Cobol_ptree__.PTree_types.varying_phrase, 'a)
                               Cobol_common.Visitor.foldmethod fold_varying_phrase' : (Cobol_ptree__.PTree_types.varying_phrase
                                 Cobol_ptree__.PTree_types.with_loc,
                                'a)
                                Cobol_common.Visitor.foldmethod fold_write_error : (Cobol_ptree__.PTree_types.write_error, 'a)
                            Cobol_common.Visitor.foldmethod fold_sort_source : (Cobol_ptree__.PTree_types.sort_source, 'a)
                            Cobol_common.Visitor.foldmethod fold_message_ending_indicator : (Cobol_ptree__.PTree_types.message_ending_indicator,
                                         'a)
                                         Cobol_common.Visitor.foldmethod fold_handler' : (Cobol_ptree__.PTree_types.handler
                          Cobol_ptree__.PTree_types.with_loc,
                         'a)
                         Cobol_common.Visitor.foldmethod fold_dual_handler : (Cobol_ptree__.PTree_types.dual_handler, 'a)
                             Cobol_common.Visitor.foldmethod fold_call_error_handler : (Cobol_ptree__.PTree_types.call_error_handler,
                                   'a)
                                   Cobol_common.Visitor.foldmethod fold_search_when_clause' : (Cobol_ptree__.PTree_types.search_when_clause
                                     Cobol_ptree__.PTree_types.with_loc,
                                    'a)
                                    Cobol_common.Visitor.foldmethod fold_read_error_handler : (Cobol_ptree__.PTree_types.read_error
                                  * Cobol_ptree__.PTree_types.dual_handler,
                                   'a)
                                   Cobol_common.Visitor.foldmethod fold_write_error_handler : (Cobol_ptree__.PTree_types.write_error
                                   * Cobol_ptree__.PTree_types.dual_handler,
                                    'a)
                                    Cobol_common.Visitor.foldmethod fold_accept' : (Cobol_ptree__.PTree_types.accept_stmt
                         Cobol_ptree__.PTree_types.with_loc,
                        'a)
                        Cobol_common.Visitor.foldmethod fold_add' : (Cobol_ptree__.PTree_types.basic_arithmetic_stmt
                      Cobol_ptree__.PTree_types.with_loc,
                     'a)
                     Cobol_common.Visitor.foldmethod fold_allocate' : (Cobol_ptree__.PTree_types.allocate_stmt
                           Cobol_ptree__.PTree_types.with_loc,
                          'a)
                          Cobol_common.Visitor.foldmethod fold_alter' : (Cobol_ptree__.PTree_types.alter_stmt
                        Cobol_ptree__.PTree_types.with_loc,
                       'a)
                       Cobol_common.Visitor.foldmethod fold_call' : (Cobol_ptree__.PTree_types.call_stmt
                       Cobol_ptree__.PTree_types.with_loc,
                      'a)
                      Cobol_common.Visitor.foldmethod fold_cancel' : (Cobol_ptree__.PTree_types.ident_or_strlit list
                         Cobol_ptree__.PTree_types.with_loc,
                        'a)
                        Cobol_common.Visitor.foldmethod fold_close' : (Cobol_ptree__.PTree_types.close_stmt
                        Cobol_ptree__.PTree_types.with_loc,
                       'a)
                       Cobol_common.Visitor.foldmethod fold_compute' : (Cobol_ptree__.PTree_types.compute_stmt
                          Cobol_ptree__.PTree_types.with_loc,
                         'a)
                         Cobol_common.Visitor.foldmethod fold_delete' : (Cobol_ptree__.PTree_types.delete_stmt
                         Cobol_ptree__.PTree_types.with_loc,
                        'a)
                        Cobol_common.Visitor.foldmethod fold_disable' : (Cobol_ptree__.PTree_types.mcs_command_operands
                          Cobol_ptree__.PTree_types.with_loc,
                         'a)
                         Cobol_common.Visitor.foldmethod fold_display' : (Cobol_ptree__.PTree_types.display_stmt
                          Cobol_ptree__.PTree_types.with_loc,
                         'a)
                         Cobol_common.Visitor.foldmethod fold_divide' : (Cobol_ptree__.PTree_types.divide_stmt
                         Cobol_ptree__.PTree_types.with_loc,
                        'a)
                        Cobol_common.Visitor.foldmethod fold_enable' : (Cobol_ptree__.PTree_types.mcs_command_operands
                         Cobol_ptree__.PTree_types.with_loc,
                        'a)
                        Cobol_common.Visitor.foldmethod fold_enter' : (Cobol_ptree__.PTree_types.enter_stmt
                        Cobol_ptree__.PTree_types.with_loc,
                       'a)
                       Cobol_common.Visitor.foldmethod fold_entry' : (Cobol_ptree__.PTree_types.entry_stmt
                        Cobol_ptree__.PTree_types.with_loc,
                       'a)
                       Cobol_common.Visitor.foldmethod fold_evaluate' : (Cobol_ptree__.PTree_types.evaluate_stmt
                           Cobol_ptree__.PTree_types.with_loc,
                          'a)
                          Cobol_common.Visitor.foldmethod fold_exec_block' : (Cobol_common.Exec_block.TYPES.exec_block
                             Cobol_ptree__.PTree_types.with_loc,
                            'a)
                            Cobol_common.Visitor.foldmethod fold_exit' : (Cobol_ptree__.PTree_types.exit_stmt
                       Cobol_ptree__.PTree_types.with_loc,
                      'a)
                      Cobol_common.Visitor.foldmethod fold_free' : (Cobol_ptree__.PTree_types.name
                       Cobol_ptree__.PTree_types.with_loc
                       list
                       Cobol_ptree__.PTree_types.with_loc,
                      'a)
                      Cobol_common.Visitor.foldmethod fold_generate' : (Cobol_ptree__.PTree_types.name
                           Cobol_ptree__.PTree_types.with_loc
                           Cobol_ptree__.PTree_types.with_loc,
                          'a)
                          Cobol_common.Visitor.foldmethod fold_goback' : (Cobol_ptree__.PTree_types.goback_stmt
                         Cobol_ptree__.PTree_types.with_loc,
                        'a)
                        Cobol_common.Visitor.foldmethod fold_goto' : (Cobol_ptree__.PTree_types.goto_stmt
                       Cobol_ptree__.PTree_types.with_loc,
                      'a)
                      Cobol_common.Visitor.foldmethod fold_if' : (Cobol_ptree__.PTree_types.if_stmt
                     Cobol_ptree__.PTree_types.with_loc,
                    'a)
                    Cobol_common.Visitor.foldmethod fold_initialize' : (Cobol_ptree__.PTree_types.initialize_stmt
                             Cobol_ptree__.PTree_types.with_loc,
                            'a)
                            Cobol_common.Visitor.foldmethod fold_initiate' : (Cobol_ptree__.PTree_types.name
                           Cobol_ptree__.PTree_types.with_loc
                           list
                           Cobol_ptree__.PTree_types.with_loc,
                          'a)
                          Cobol_common.Visitor.foldmethod fold_inspect' : (Cobol_ptree__.PTree_types.inspect_stmt
                          Cobol_ptree__.PTree_types.with_loc,
                         'a)
                         Cobol_common.Visitor.foldmethod fold_invoke' : (Cobol_ptree__.PTree_types.invoke_stmt
                         Cobol_ptree__.PTree_types.with_loc,
                        'a)
                        Cobol_common.Visitor.foldmethod fold_merge' : (Cobol_ptree__.PTree_types.merge_stmt
                        Cobol_ptree__.PTree_types.with_loc,
                       'a)
                       Cobol_common.Visitor.foldmethod fold_move' : (Cobol_ptree__.PTree_types.move_stmt
                       Cobol_ptree__.PTree_types.with_loc,
                      'a)
                      Cobol_common.Visitor.foldmethod fold_multiply' : (Cobol_ptree__.PTree_types.multiply_stmt
                           Cobol_ptree__.PTree_types.with_loc,
                          'a)
                          Cobol_common.Visitor.foldmethod fold_open' : (Cobol_ptree__.PTree_types.open_stmt
                       Cobol_ptree__.PTree_types.with_loc,
                      'a)
                      Cobol_common.Visitor.foldmethod fold_purge' : (Cobol_ptree__.PTree_types.name
                        Cobol_ptree__.PTree_types.with_loc
                        Cobol_ptree__.PTree_types.with_loc,
                       'a)
                       Cobol_common.Visitor.foldmethod fold_raise' : (Cobol_ptree__.PTree_types.raise_operand
                        Cobol_ptree__.PTree_types.with_loc,
                       'a)
                       Cobol_common.Visitor.foldmethod fold_read' : (Cobol_ptree__.PTree_types.read_stmt
                       Cobol_ptree__.PTree_types.with_loc,
                      'a)
                      Cobol_common.Visitor.foldmethod fold_receive' : (Cobol_ptree__.PTree_types.receive_stmt
                          Cobol_ptree__.PTree_types.with_loc,
                         'a)
                         Cobol_common.Visitor.foldmethod fold_release' : (Cobol_ptree__.PTree_types.release_stmt
                          Cobol_ptree__.PTree_types.with_loc,
                         'a)
                         Cobol_common.Visitor.foldmethod fold_resume' : (Cobol_ptree__.PTree_types.resume_stmt
                         Cobol_ptree__.PTree_types.with_loc,
                        'a)
                        Cobol_common.Visitor.foldmethod fold_return' : (Cobol_ptree__.PTree_types.return_stmt
                         Cobol_ptree__.PTree_types.with_loc,
                        'a)
                        Cobol_common.Visitor.foldmethod fold_rewrite' : (Cobol_ptree__.PTree_types.rewrite_stmt
                          Cobol_ptree__.PTree_types.with_loc,
                         'a)
                         Cobol_common.Visitor.foldmethod fold_search' : (Cobol_ptree__.PTree_types.search_stmt
                         Cobol_ptree__.PTree_types.with_loc,
                        'a)
                        Cobol_common.Visitor.foldmethod fold_search_all' : (Cobol_ptree__.PTree_types.search_all_stmt
                             Cobol_ptree__.PTree_types.with_loc,
                            'a)
                            Cobol_common.Visitor.foldmethod fold_send' : (Cobol_ptree__.PTree_types.send_stmt
                       Cobol_ptree__.PTree_types.with_loc,
                      'a)
                      Cobol_common.Visitor.foldmethod fold_set' : (Cobol_ptree__.PTree_types.set_stmt
                      Cobol_ptree__.PTree_types.with_loc,
                     'a)
                     Cobol_common.Visitor.foldmethod fold_sort' : (Cobol_ptree__.PTree_types.sort_stmt
                       Cobol_ptree__.PTree_types.with_loc,
                      'a)
                      Cobol_common.Visitor.foldmethod fold_start' : (Cobol_ptree__.PTree_types.start_stmt
                        Cobol_ptree__.PTree_types.with_loc,
                       'a)
                       Cobol_common.Visitor.foldmethod fold_stop' : (Cobol_ptree__.PTree_types.stop_stmt
                       Cobol_ptree__.PTree_types.with_loc,
                      'a)
                      Cobol_common.Visitor.foldmethod fold_string_stmt' : (Cobol_ptree__.PTree_types.string_stmt
                              Cobol_ptree__.PTree_types.with_loc,
                             'a)
                             Cobol_common.Visitor.foldmethod fold_subtract' : (Cobol_ptree__.PTree_types.basic_arithmetic_stmt
                           Cobol_ptree__.PTree_types.with_loc,
                          'a)
                          Cobol_common.Visitor.foldmethod fold_terminate' : (Cobol_ptree__.PTree_types.terminate_stmt
                            Cobol_ptree__.PTree_types.with_loc,
                           'a)
                           Cobol_common.Visitor.foldmethod fold_unlock' : (Cobol_ptree__.PTree_types.unlock_stmt
                         Cobol_ptree__.PTree_types.with_loc,
                        'a)
                        Cobol_common.Visitor.foldmethod fold_unstring' : (Cobol_ptree__.PTree_types.unstring_stmt
                           Cobol_ptree__.PTree_types.with_loc,
                          'a)
                          Cobol_common.Visitor.foldmethod fold_validate' : (Cobol_ptree__.PTree_types.ident list
                           Cobol_ptree__.PTree_types.with_loc,
                          'a)
                          Cobol_common.Visitor.foldmethod fold_write' : (Cobol_ptree__.PTree_types.write_stmt
                        Cobol_ptree__.PTree_types.with_loc,
                       'a)
                       Cobol_common.Visitor.fold