dotgnu-pnet-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Dotgnu-pnet-commits] CVS: pnet/image class.c,1.21,1.22 generic.c,1.3,1.


From: Rhys Weatherley <address@hidden>
Subject: [Dotgnu-pnet-commits] CVS: pnet/image class.c,1.21,1.22 generic.c,1.3,1.4
Date: Tue, 25 Feb 2003 19:07:28 -0500

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

Modified Files:
        class.c generic.c 
Log Message:


Begin implementing type gathering for generic types.


Index: class.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/image/class.c,v
retrieving revision 1.21
retrieving revision 1.22
diff -C2 -r1.21 -r1.22
*** class.c     24 Feb 2003 00:57:46 -0000      1.21
--- class.c     26 Feb 2003 00:07:25 -0000      1.22
***************
*** 1135,1138 ****
--- 1135,1139 ----
  ILMember *ILClassNextMember(ILClass *info, ILMember *last)
  {
+       info = ILClassGetUnderlying(info);
        if(last)
        {
***************
*** 1151,1154 ****
--- 1152,1156 ----
  ILMember *ILClassNextMemberByKind(ILClass *info, ILMember *last, int kind)
  {
+       info = ILClassGetUnderlying(info);
        if(last)
        {
***************
*** 1177,1180 ****
--- 1179,1183 ----
                                                                 const char 
*name, ILType *signature)
  {
+       info = ILClassGetUnderlying(info);
        if(last)
        {

Index: generic.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/image/generic.c,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** generic.c   20 Feb 2003 22:35:21 -0000      1.3
--- generic.c   26 Feb 2003 00:07:26 -0000      1.4
***************
*** 725,728 ****
--- 725,742 ----
  }
  
+ ILClass *ILClassGetUnderlying(ILClass *info)
+ {
+       ILType *synType = info->synthetic;
+       if(ILType_IsWith(synType))
+       {
+               synType = ILTypeGetWithMain(synType);
+               return ILClassFromType(info->programItem.image, 0, synType, 0);
+       }
+       else
+       {
+               return info;
+       }
+ }
+ 
  #ifdef        __cplusplus
  };





reply via email to

[Prev in Thread] Current Thread [Next in Thread]