[dotgnu-pnet-commits] pnet ChangeLog support/read_float.c support/wri...

[Klaus Treichel]

CVSROOT:        /cvsroot/dotgnu-pnet
Module name:    pnet
Changes by:     Klaus Treichel <ktreichel>      07/10/13 09:54:07

Modified files:
        .              : ChangeLog 
        support        : read_float.c write_float.c 
        cscc/csharp    : cs_stmt.tc 

Log message:
        Fix some compiler warnings and the using statement for expressions.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/pnet/ChangeLog?cvsroot=dotgnu-pnet&r1=1.3506&r2=1.3507
http://cvs.savannah.gnu.org/viewcvs/pnet/support/read_float.c?cvsroot=dotgnu-pnet&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/pnet/support/write_float.c?cvsroot=dotgnu-pnet&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/csharp/cs_stmt.tc?cvsroot=dotgnu-pnet&r1=1.40&r2=1.41

Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/ChangeLog,v
retrieving revision 1.3506
retrieving revision 1.3507
diff -u -b -r1.3506 -r1.3507
--- ChangeLog   12 Oct 2007 15:07:08 -0000      1.3506
+++ ChangeLog   13 Oct 2007 09:54:06 -0000      1.3507
@@ -1,3 +1,12 @@
+2007-10-13  Klaus Treichel  <address@hidden>
+
+       * support/read_float.c, support/write_float.c: Extend the number of 
bytes
+       in the convert union to 8 in _ILReadDouble and _ILWriteDouble to match
+       the correct length and fix compiler warnings with gcc 4.2.1.
+
+       * cscc/csharp/cs_stmt.tc: Fix the using statement for expressions.
+       (bug #20790)
+
 2007-10-12  Radek Polak  <address@hidden>
 
        * engine/int_proto.h, engine/int_table.c, engine/lib_thread.c,

Index: support/read_float.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/support/read_float.c,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- support/read_float.c        12 Nov 2006 17:10:11 -0000      1.3
+++ support/read_float.c        13 Oct 2007 09:54:06 -0000      1.4
@@ -57,7 +57,7 @@
 {
        union
        {
-               unsigned char bytes[4];
+               unsigned char bytes[8];
                ILDouble      value;
                struct {
                        ILUInt32  first;

Index: support/write_float.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/support/write_float.c,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- support/write_float.c       12 Nov 2006 17:10:11 -0000      1.3
+++ support/write_float.c       13 Oct 2007 09:54:06 -0000      1.4
@@ -58,7 +58,7 @@
 {
        union
        {
-               unsigned char bytes[4];
+               unsigned char bytes[8];
                ILDouble      value;
                struct {
                        ILUInt32  first;

Index: cscc/csharp/cs_stmt.tc
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/csharp/cs_stmt.tc,v
retrieving revision 1.40
retrieving revision 1.41
diff -u -b -r1.40 -r1.41
--- cscc/csharp/cs_stmt.tc      5 May 2007 15:56:41 -0000       1.40
+++ cscc/csharp/cs_stmt.tc      13 Oct 2007 09:54:06 -0000      1.41
@@ -1483,7 +1483,15 @@
        ILType *type;
        ILType *disposable;
        
-       if(yyisa(node->resource,ILNode_Expression))
+       if(yyisa(node->resource,ILNode_ResourceDeclaration))
+       {
+               /* TODO: Handle the declaration of multiple resources in the
+                  using statement like using(type a, b, c) { ... }.
+                  They should be converted to distinct nested using statements
+                  like using(type a) { using(type b) { using(type c) { ... 
}}}. */
+               ILNode_SemAnalysis(node->resource,info,&(node->resource));
+       }
+       else 
        {
                
value=ILNode_SemAnalysis(node->resource,info,&(node->resource));                
                if(!CSSemGetType(value))
@@ -1503,10 +1511,6 @@
                                        CSTypeToName(type));
                }
        }
-       else if(yyisa(node->resource,ILNode_ResourceDeclaration))
-       {
-               ILNode_SemAnalysis(node->resource,info,&(node->resource));
-       }
        ILNode_SemAnalysis(node->stmt,info,&(node->stmt));
        return CSSemValueDefault;
 }
@@ -1527,7 +1531,7 @@
        {
                ILNode_GenDiscard(node->resource,info);
        }
-       else if(yyisa(node->resource,ILNode_Expression))
+       else
        {
                
tempVar=ILGenTempTypedVar(info,ILFindSystemType(info,"IDisposable"));
                ILNode_GenValue(node->resource,info);
@@ -1566,7 +1570,7 @@
                        ILGenAdjust(info, -1);
                }
        }
-       else if(yyisa(node->resource,ILNode_Expression))
+       else
        {
                ILGenLoadLocal(info, tempVar);
                ILGenAdjust(info, 1);