CVSROOT: /cvsroot/dotgnu-pnet
Module name: pnet
Changes by: Klaus Treichel <ktreichel> 09/03/25 19:26:05
Modified files:
. : ChangeLog
dumpasm : dump_class.c
Log message:
Dump the constant attached to a property.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/pnet/ChangeLog?cvsroot=dotgnu-pnet&r1=1.3609&r2=1.3610
http://cvs.savannah.gnu.org/viewcvs/pnet/dumpasm/dump_class.c?cvsroot=dotgnu-pnet&r1=1.7&r2=1.8
Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/ChangeLog,v
retrieving revision 1.3609
retrieving revision 1.3610
diff -u -b -r1.3609 -r1.3610
--- ChangeLog 22 Mar 2009 20:39:10 -0000 1.3609
+++ ChangeLog 25 Mar 2009 19:26:04 -0000 1.3610
@@ -1,3 +1,8 @@
+2009-03-25 Klaus Treichel <[email protected]>
+
+ * dumpasm/dump_class.c (Dump_PropertyDef): Add output of the constant
+ attached to a property.
+
2009-03-22 Klaus Treichel <[email protected]>
* ilalink/link_class.c (CreateClass): Set new class in <Module> even if
Index: dumpasm/dump_class.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/dumpasm/dump_class.c,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -b -r1.7 -r1.8
--- dumpasm/dump_class.c 26 Nov 2008 20:15:22 -0000 1.7
+++ dumpasm/dump_class.c 25 Mar 2009 19:26:04 -0000 1.8
@@ -347,6 +347,10 @@
/* Dump the property type */
ILDumpMethodType(outstream, image, ILProperty_Signature(property),
flags,
0, ILProperty_Name(property), 0);
+ if((ILProperty_Attrs(property) & IL_META_PROPDEF_HAS_DEFAULT) != 0)
+ {
+ ILDumpConstant(outstream, (ILProgramItem *)property, 0);
+ }
fputs("\n\t{\n", outstream);
/* Dump the custom attributes */
_______________________________________________
dotgnu-pnet-commits mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/dotgnu-pnet-commits
