kernel-doc (6013d5445f9a6d0b28090027868f455c5012d1cc) kernel-doc (c73894c1e1160296552d8713e88bc76eac43beba)
1#!/usr/bin/perl -w
2
3use strict;
4
5## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##
6## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ##
7## Copyright (C) 2001 Simon Huggins ##
8## ##

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

548}
549
550sub output_section_xml(%) {
551 my %args = %{$_[0]};
552 my $section;
553 # print out each section
554 $lineprefix=" ";
555 foreach $section (@{$args{'sectionlist'}}) {
1#!/usr/bin/perl -w
2
3use strict;
4
5## Copyright (c) 1998 Michael Zucchi, All Rights Reserved ##
6## Copyright (C) 2000, 1 Tim Waugh <twaugh@redhat.com> ##
7## Copyright (C) 2001 Simon Huggins ##
8## ##

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

548}
549
550sub output_section_xml(%) {
551 my %args = %{$_[0]};
552 my $section;
553 # print out each section
554 $lineprefix=" ";
555 foreach $section (@{$args{'sectionlist'}}) {
556 print "<refsect1>\n <title>$section</title>\n <para>\n";
556 print "<refsect1>\n";
557 print "<title>$section</title>\n";
557 if ($section =~ m/EXAMPLE/i) {
558 if ($section =~ m/EXAMPLE/i) {
558 print "<example><para>\n";
559 print "<informalexample><programlisting>\n";
560 } else {
561 print "<para>\n";
559 }
560 output_highlight($args{'sections'}{$section});
561 if ($section =~ m/EXAMPLE/i) {
562 }
563 output_highlight($args{'sections'}{$section});
564 if ($section =~ m/EXAMPLE/i) {
562 print "</para></example>\n";
565 print "</programlisting></informalexample>\n";
566 } else {
567 print "</para>\n";
563 }
568 }
564 print " </para>\n</refsect1>\n";
569 print "</refsect1>\n";
565 }
566}
567
568# output function in XML DocBook
569sub output_function_xml(%) {
570 my %args = %{$_[0]};
571 my ($parameter, $section);
572 my $count;

--- 1261 unchanged lines hidden --- 		570 }
571}
572
573# output function in XML DocBook
574sub output_function_xml(%) {
575 my %args = %{$_[0]};
576 my ($parameter, $section);
577 my $count;

--- 1261 unchanged lines hidden ---