[Dotgnu-pnet-commits] CVS: pnet/image lib_attrs.c,1.7,1.8

[Rhys Weatherley <address@hidden>]

Update of /cvsroot/dotgnu-pnet/pnet/image
In directory subversions:/tmp/cvs-serv23965/image

Modified Files:
        lib_attrs.c 
Log Message:


Recognise the "ComImportAttribute" class and use it to set the
"import" flag on classes.


Index: lib_attrs.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/image/lib_attrs.c,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -r1.7 -r1.8
*** lib_attrs.c 21 Feb 2003 04:30:03 -0000      1.7
--- lib_attrs.c 25 Apr 2003 02:59:28 -0000      1.8
***************
*** 692,695 ****
--- 692,715 ----
  
  /*
+  * Process a "ComImport" attribute, which sets the "import" flag on the type.
+  */
+ static int ComImportAttribute(ILProgramItem *item, ILSerializeReader *reader)
+ {
+       ILClass *classInfo;
+ 
+       /* We must use this on a class */
+       classInfo = ILProgramItemToClass(item);
+       if(!classInfo)
+       {
+               return 0;
+       }
+ 
+       /* Mark the class as serialized */
+       ILClassSetAttrs(classInfo, IL_META_TYPEDEF_IMPORT,
+                                                          
IL_META_TYPEDEF_IMPORT);
+       return 1;
+ }
+ 
+ /*
   * Process a method implementation attribute.
   */
***************
*** 756,759 ****
--- 776,780 ----
        {"StructLayoutAttribute", StructLayoutAttribute},
        {"MarshalAsAttribute", MarshalAsAttribute},
+       {"ComImportAttribute", ComImportAttribute},
        {0, 0}
  };