kernel-doc (52042e2db45290f6a512d525518488b7bf143531) kernel-doc (06a755d6269c072ed0c9b84227eaf33113dc243f)
1#!/usr/bin/env perl
2# SPDX-License-Identifier: GPL-2.0
3
4use warnings;
5use strict;
6
7## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##
8## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ##

--- 822 unchanged lines hidden (view full) ---

831sub output_blockhead_rst(%) {
832 my %args = %{$_[0]};
833 my ($parameter, $section);
834
835 foreach $section (@{$args{'sectionlist'}}) {
836 next if (defined($nosymbol_table{$section}));
837
838 if ($output_selection != OUTPUT_INCLUDE) {
1#!/usr/bin/env perl
2# SPDX-License-Identifier: GPL-2.0
3
4use warnings;
5use strict;
6
7## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##
8## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ##

--- 822 unchanged lines hidden (view full) ---

831sub output_blockhead_rst(%) {
832 my %args = %{$_[0]};
833 my ($parameter, $section);
834
835 foreach $section (@{$args{'sectionlist'}}) {
836 next if (defined($nosymbol_table{$section}));
837
838 if ($output_selection != OUTPUT_INCLUDE) {
839 print ".. _$section:\n\n";
839 print "**$section**\n\n";
840 }
841 print_lineno($section_start_lines{$section});
842 output_highlight_rst($args{'sections'}{$section});
843 print "\n";
844 }
845}
846

--- 1623 unchanged lines hidden --- 		840 print "**$section**\n\n";
841 }
842 print_lineno($section_start_lines{$section});
843 output_highlight_rst($args{'sections'}{$section});
844 print "\n";
845 }
846}
847

--- 1623 unchanged lines hidden ---