git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@17165 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
CaS 2003-07-07 05:36:53 +00:00
parent 2443774853
commit ec7af312f4

View file

@ -347,6 +347,7 @@
{ {
unichar *start = 0; unichar *start = 0;
BOOL isDocumentation = NO; BOOL isDocumentation = NO;
BOOL skippedFirstLine = NO;
NSRange r; NSRange r;
pos += 2; /* Skip opening part */ pos += 2; /* Skip opening part */
@ -365,6 +366,7 @@
if ([self skipSpaces] < length && buffer[pos] == '\n') if ([self skipSpaces] < length && buffer[pos] == '\n')
{ {
pos++; pos++;
skippedFirstLine = YES;
} }
} }
@ -414,11 +416,14 @@
* asterisk on each line should be stripped. * asterisk on each line should be stripped.
* Otherwise we take the comment verbatim. * Otherwise we take the comment verbatim.
*/ */
if (skippedFirstLine == NO)
{
while (ptr < end && *ptr != '\n') while (ptr < end && *ptr != '\n')
{ {
ptr++; ptr++;
} }
ptr++; // Step past the end of the first line. ptr++; // Step past the end of the first line.
}
while (ptr < end) while (ptr < end)
{ {
unichar c = *ptr++; unichar c = *ptr++;