Various documentation releated fixes/improvements.

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@22190 72102866-910b-0410-8b05-ffd578937521

Tools/AGSHtml.m

@@ -187,7 +187,7 @@ static NSString		*mainFont = nil;
       s = [NSString stringWithFormat: @"<a %@=\"%@%@%@$%@\">",
 	kind, s, hash, t, r];
     }
-  return s;
+  return [s stringByReplacingString: @":" withString: @"$"];
 }
 
 /**
@@ -272,7 +272,7 @@ static NSString		*mainFont = nil;
 	    kind, s, hash, t, u, sep, r];
 	}
     }
-  return s;
+  return [s stringByReplacingString: @":" withString: @"$"];
 }
 
 - (NSString*) outputDocument: (GSXMLNode*)node
@@ -362,6 +362,7 @@ static NSString		*mainFont = nil;
 	  NSString	*text = [dict objectForKey: ref];
 	  NSString	*file = ref;
 
+	  ref = [ref stringByReplacingString: @":" withString: @"$"];
 	  if ([file isEqual: base] == YES)
 	    {
 	      continue;	// Don't list current file.
@@ -463,6 +464,8 @@ static NSString		*mainFont = nil;
 			      NSString	*ref = [NSString stringWithFormat:
 				@"(%@)%@", catName, mname];
 
+			      ref = [ref stringByReplacingString: @":"
+						      withString: @"$"];
 			      [m setObject: file forKey: ref];
 			    }
 			}
@@ -495,6 +498,8 @@ static NSString		*mainFont = nil;
 	  NSString	*file = [dict objectForKey: ref];
 	  NSString	*text = ref;
 
+	  ref = [ref stringByReplacingString: @":" withString: @"$"];
+
 	  /*
 	   * If a reference to a method contains a leading category name,
 	   * we don't want it in the visible method name, however if it's
@@ -536,7 +541,7 @@ static NSString		*mainFont = nil;
 	  else
 	    {
               if  (([type isEqual: @"protocol"] == YES)
-                   && ([text hasPrefix: @"&lt;"] == NO))
+		&& ([text hasPrefix: @"&lt;"] == NO))
                 {
                   // it's an informal protocol, detected earlier as an
                   // unimplemented category of NSObject; make proper link

Tools/AGSParser.m

@@ -1089,6 +1089,24 @@
 	}
       else
 	{
+	  if ([s isEqualToString: @"extern"] == YES
+	    && [self skipSpaces] < length - 3 && buffer[pos] == '\"'
+	    && buffer[pos+1] == 'C' && buffer[pos+2] == '\"')
+	    {
+	      /*
+	       * Found 'extern "C" ...'
+	       * Which is for C++ and should be ignored
+	       */
+	      pos += 3;
+	      if ([self skipSpaces] < length && buffer[pos] == '{')
+		{
+		  pos++;
+		  [self skipSpaces];
+		}
+	      DESTROY(arp);
+	      return nil;
+	    }
+
 	  if ([s isEqualToString: @"typedef"] == YES)
 	    {
 	      isTypedef = YES;
@@ -1483,6 +1501,11 @@
 		}
 	      [self skipBlock];
 	    }
+	  else if (buffer[pos] == '}')
+	    {
+	      pos++;			// Ignore extraneous '}'
+	      [self skipSpaces];
+	    }
 	  else
 	    {
 	      [self log: @"Unexpected char (%c) in declaration", buffer[pos]];