patch-2.3.99-pre4 linux/scripts/kernel-doc

Next file: linux/CREDITS
Previous file: linux/scripts/gen-all-syms
Back to the patch index
Back to the overall index

diff -u --recursive --new-file v2.3.99-pre3/linux/scripts/kernel-doc linux/scripts/kernel-doc
@@ -238,6 +238,7 @@
 	if ($line eq ""){
 	    print $lineprefix, $blankline;
 	} else {
+            $line =~ s/\\\\\\/\&/g;
 	    print $lineprefix, $line;
 	}
 	print "\n";
@@ -640,6 +641,12 @@
 	    }
 	    $type = join " ", @args;
 
+	    if ($type eq "" && $param eq "...")
+	    {
+		$type="...";
+		$param="...";
+		$parameters{"..."} = "variable arguments";
+	    }
 	    if ($type eq "")
 	    {
 		$type="";
@@ -753,6 +760,9 @@
 		$newcontents = $2;
 
 		if ($contents ne "") {
+		    $contents =~ s/\&/\\\\\\amp;/g;
+		    $contents =~ s/\</\\\\\\lt;/g;
+		    $contents =~ s/\>/\\\\\\gt;/g;
 		    dump_section($section, $contents);
 		    $section = $section_default;
 		}
@@ -765,6 +775,9 @@
 	    } elsif (/$doc_end/) {
 
 		if ($contents ne "") {
+		    $contents =~ s/\&/\\\\\\amp;/g;
+		    $contents =~ s/\</\\\\\\lt;/g;
+		    $contents =~ s/\>/\\\\\\gt;/g;
 		    dump_section($section, $contents);
 		    $section = $section_default;
 		    $contents = "";
@@ -777,6 +790,9 @@
 		# miguel-style comment kludge, look for blank lines after
 		# @parameter line to signify start of description
 		if ($1 eq "" && $section =~ m/^@/) {
+		    $contents =~ s/\&/\\\\\\amp;/g;
+		    $contents =~ s/\</\\\\\\lt;/g;
+		    $contents =~ s/\>/\\\\\\gt;/g;
 		    dump_section($section, $contents);
 		    $section = $section_default;
 		    $contents = "";


FUNET's LINUX-ADM group, linux-adm@nic.funet.fi
TCL-scripts by Sam Shen (who was at: slshen@lbl.gov)