doc. system: Allow single-line comments before def

diff --git a/build/doc-extract b/build/doc-extract
index 576ad022cd75e6c0fda264cf35aba80fd34020a0..a7aabe4f7935b7353ad969dd38f57ca53fe0b393 100755 (executable)
--- a/build/doc-extract
+++ b/build/doc-extract
@@ -159,9 +159,12 @@ sub process( $$ ) {
                                        $struct = $sdepth = 1;
                                }
                        } elsif( ( $buff ) = ( $line =~ /\/\*\*\*(.*)\*\*\*\// ) ) {
-                               $buff =~ s/\s?//;
+                               $buff =~ s/^\s?//;
                                print OUT "$buff\n\n";
                                $buff = undef;
+                       } elsif( ( $buff ) = ( $line =~ /^\s*\/\*\*(.*)\*\*\// ) ) {
+                               $buff =~ s/^\s*//;
+                               $buff .= "\n";
                        } elsif( ( $head, $buff ) = ( $line =~ /^(.*)\/\*\*(.*)\*\*\// ) ) {
                                $buff =~ s/^\s*//;
                                $buff =~ s/\s*$//;