[Dotgnu-pnet-commits] CVS: pnet/csdoc doc_valil.c,1.11,1.12

[Rhys Weatherley <address@hidden>]

Update of /cvsroot/dotgnu-pnet/pnet/csdoc
In directory subversions:/tmp/cvs-serv17164/csdoc

Modified Files:
        doc_valil.c 
Log Message:


Don't report extra classes that are marked with the
"NonStandardExtra" attribute.


Index: doc_valil.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/csdoc/doc_valil.c,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -r1.11 -r1.12
*** doc_valil.c 3 Sep 2003 06:57:11 -0000       1.11
--- doc_valil.c 12 Sep 2003 11:02:10 -0000      1.12
***************
*** 2685,2688 ****
--- 2685,2708 ----
  
  /*
+  * Determine if an extra type is known to be a non-standard extra.
+  */
+ static int IsNonStandardExtra(ILClass *classInfo)
+ {
+       ILAttribute *attr = 0;
+       ILMethod *method;
+       while((attr = ILProgramItemNextAttribute
+                               (ILToProgramItem(classInfo), attr)) != 0)
+       {
+               method = ILProgramItemToMethod(ILAttributeTypeAsItem(attr));
+               if(method && !strcmp(ILClass_Name(ILMethod_Owner(method)),
+                                                        
"NonStandardExtraAttribute"))
+               {
+                       return 1;
+               }
+       }
+       return 0;
+ }
+ 
+ /*
   * Determine if we have an assembly match between a type
   * and an image.
***************
*** 2721,2739 ****
                        {
                                /* This is an extra type */
!                               ++numExtras;
!                               if(xmlOutput)
!                               {
!                                       fputs("\t<class name=\"", stream);
!                                       PrintString(fullName, stream);
!                                       fputs("\" assembly=\"", stream);
!                                       PrintString(ILImageGetAssemblyName
!                                               
(ILProgramItem_Image(classInfo)), stream);
!                                       fputs("\">\n", stream);
!                                       fprintf(stream, "\t\t<extra/>\n");
!                                       fprintf(stream, "\t</class>\n");
!                               }
!                               else
                                {
!                                       fprintf(stream, "%s is not 
documented\n", fullName);
                                }
                        }
--- 2741,2762 ----
                        {
                                /* This is an extra type */
!                               if(!IsNonStandardExtra(classInfo))
                                {
!                                       ++numExtras;
!                                       if(xmlOutput)
!                                       {
!                                               fputs("\t<class name=\"", 
stream);
!                                               PrintString(fullName, stream);
!                                               fputs("\" assembly=\"", stream);
!                                               
PrintString(ILImageGetAssemblyName
!                                                       
(ILProgramItem_Image(classInfo)), stream);
!                                               fputs("\">\n", stream);
!                                               fprintf(stream, 
"\t\t<extra/>\n");
!                                               fprintf(stream, "\t</class>\n");
!                                       }
!                                       else
!                                       {
!                                               fprintf(stream, "%s is not 
documented\n", fullName);
!                                       }
                                }
                        }