[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[dotgnu-pnet-commits] pnet ChangeLog codegen/cg_gen.c codegen/cg_misc...
|
From: |
Klaus Treichel |
|
Subject: |
[dotgnu-pnet-commits] pnet ChangeLog codegen/cg_gen.c codegen/cg_misc... |
|
Date: |
Fri, 01 Jun 2007 11:08:52 +0000 |
CVSROOT: /cvsroot/dotgnu-pnet
Module name: pnet
Changes by: Klaus Treichel <ktreichel> 07/06/01 11:08:52
Modified files:
. : ChangeLog
codegen : cg_gen.c cg_misc.tc cg_stmt.tc jv_cast.tc
jv_misc.tc jv_stmt.tc
cscc : cs_main.c java_main.c vb_main.c csdoc.c
cscc/c : c_oper.tc
cscc/common : cc_errors.c cc_main.c cc_preproc.c
cscc/csharp : cs_cast.tc cs_invoke.tc cs_lookup.c
cs_lvalue.tc cs_oper.tc
image : winres_reader.c winres_writer.c
Log message:
Fix more signed bitfield assignmants for gcc 4.2.0
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/pnet/ChangeLog?cvsroot=dotgnu-pnet&r1=1.3465&r2=1.3466
http://cvs.savannah.gnu.org/viewcvs/pnet/codegen/cg_gen.c?cvsroot=dotgnu-pnet&r1=1.50&r2=1.51
http://cvs.savannah.gnu.org/viewcvs/pnet/codegen/cg_misc.tc?cvsroot=dotgnu-pnet&r1=1.49&r2=1.50
http://cvs.savannah.gnu.org/viewcvs/pnet/codegen/cg_stmt.tc?cvsroot=dotgnu-pnet&r1=1.46&r2=1.47
http://cvs.savannah.gnu.org/viewcvs/pnet/codegen/jv_cast.tc?cvsroot=dotgnu-pnet&r1=1.7&r2=1.8
http://cvs.savannah.gnu.org/viewcvs/pnet/codegen/jv_misc.tc?cvsroot=dotgnu-pnet&r1=1.30&r2=1.31
http://cvs.savannah.gnu.org/viewcvs/pnet/codegen/jv_stmt.tc?cvsroot=dotgnu-pnet&r1=1.20&r2=1.21
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/cs_main.c?cvsroot=dotgnu-pnet&r1=1.23&r2=1.24
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/java_main.c?cvsroot=dotgnu-pnet&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/vb_main.c?cvsroot=dotgnu-pnet&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/csdoc.c?cvsroot=dotgnu-pnet&r1=1.25&r2=1.26
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/c/c_oper.tc?cvsroot=dotgnu-pnet&r1=1.43&r2=1.44
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/common/cc_errors.c?cvsroot=dotgnu-pnet&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/common/cc_main.c?cvsroot=dotgnu-pnet&r1=1.38&r2=1.39
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/common/cc_preproc.c?cvsroot=dotgnu-pnet&r1=1.6&r2=1.7
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/csharp/cs_cast.tc?cvsroot=dotgnu-pnet&r1=1.13&r2=1.14
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/csharp/cs_invoke.tc?cvsroot=dotgnu-pnet&r1=1.31&r2=1.32
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/csharp/cs_lookup.c?cvsroot=dotgnu-pnet&r1=1.35&r2=1.36
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/csharp/cs_lvalue.tc?cvsroot=dotgnu-pnet&r1=1.61&r2=1.62
http://cvs.savannah.gnu.org/viewcvs/pnet/cscc/csharp/cs_oper.tc?cvsroot=dotgnu-pnet&r1=1.50&r2=1.51
http://cvs.savannah.gnu.org/viewcvs/pnet/image/winres_reader.c?cvsroot=dotgnu-pnet&r1=1.4&r2=1.5
http://cvs.savannah.gnu.org/viewcvs/pnet/image/winres_writer.c?cvsroot=dotgnu-pnet&r1=1.2&r2=1.3
Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/ChangeLog,v
retrieving revision 1.3465
retrieving revision 1.3466
diff -u -b -r1.3465 -r1.3466
--- ChangeLog 1 Jun 2007 07:35:34 -0000 1.3465
+++ ChangeLog 1 Jun 2007 11:08:50 -0000 1.3466
@@ -3,6 +3,15 @@
* image/java_loader.c, image/member.c, image/meta_writer.c,
image/pecoff_loader.c: Fix more signed bitfield assignments for gcc
4.2.0.
+ * codegen/cg_gen.c, codegen/cg_misc.tc, codegen/cg_stmt.tc,
+ codegen/jv_cast.tc, codegen/jv_misc.tc, codegen/jv_stmt.tc,
+ cscc/cs_main.c, cscc/java_main.c, cscc/vb_main.c, cscc/csdoc.c,
+ cscc/c/c_oper.tc, cscc/common/cc_errors.c, cscc/common/cc_main.c,
+ cscc/common/cc_preproc.c, cscc/csharp/cs_cast.tc,
cscc/csharp/cs_invoke.tc,
+ cscc/csharp/cs_lookup.c, cscc/csharp/cs_lvalue.tc,
cscc/csharp/cs_oper.tc,
+ image/winres_reader.c, image/winres_writer.c: Fix more signed bitfield
+ assignments for gcc 4.2.0.
+
2007-05-31 Klaus Treichel <address@hidden>
* engine/ilverify.c: Fix the verifier.
Index: codegen/cg_gen.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/codegen/cg_gen.c,v
retrieving revision 1.50
retrieving revision 1.51
diff -u -b -r1.50 -r1.51
--- codegen/cg_gen.c 24 May 2007 13:51:14 -0000 1.50
+++ codegen/cg_gen.c 1 Jun 2007 11:08:50 -0000 1.51
@@ -95,21 +95,22 @@
ILMemPoolInitType(&(info->nodePool), ILNode, 0);
ILScopeInit(info);
info->nextLabel = 1;
- info->overflowInsns = 1;
- info->overflowGlobal = 1;
+ info->overflowInsns = -1;
+ info->overflowGlobal = -1;
info->overflowChanged = 0;
info->pedanticArith = 0;
info->clsCompliant = 0;
info->semAnalysis = 0;
info->typeGather = 0;
info->inSemType = 0;
+ info->inSemStatic = 0;
info->inAttrArg = 0;
info->useJavaLib = 0;
info->outputIsJava = 0;
info->debugFlag = 0;
info->hasUnsafe = 0;
info->needSwitchPop = 0;
- info->hasGotoScopes = 1;
+ info->hasGotoScopes = -1;
info->resolvingAlias = 0;
info->decimalRoundMode = IL_DECIMAL_ROUND_HALF_EVEN;
info->stackHeight = 0;
@@ -151,7 +152,7 @@
void ILGenInfoToJava(ILGenInfo *info)
{
- info->outputIsJava = 1;
+ info->outputIsJava = -1;
JavaGenInit(info);
}
Index: codegen/cg_misc.tc
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/codegen/cg_misc.tc,v
retrieving revision 1.49
retrieving revision 1.50
diff -u -b -r1.49 -r1.50
--- codegen/cg_misc.tc 7 Nov 2003 01:23:55 -0000 1.49
+++ codegen/cg_misc.tc 1 Jun 2007 11:08:50 -0000 1.50
@@ -49,7 +49,7 @@
{
ILMachineType type;
int oldOverflow = info->overflowInsns;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
type = ILNode_GetType(node->expr, info);
info->overflowInsns = oldOverflow;
return type;
@@ -75,7 +75,7 @@
{
ILMachineType type;
int oldPedantic = info->pedanticArith;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
type = ILNode_GetType(node->expr, info);
info->pedanticArith = oldPedantic;
return type;
@@ -424,7 +424,7 @@
ILNode_GenDiscard(ILNode_Overflow)
{
int oldOverflow = info->overflowInsns;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
ILNode_GenDiscard(node->expr, info);
info->overflowInsns = oldOverflow;
}
@@ -446,7 +446,7 @@
ILNode_GenDiscard(ILNode_Pedantic)
{
int oldPedantic = info->pedanticArith;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
ILNode_GenDiscard(node->expr, info);
info->pedanticArith = oldPedantic;
}
@@ -613,7 +613,7 @@
{
int oldOverflow = info->overflowInsns;
ILMachineType valueType;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
valueType = ILNode_GenValue(node->expr, info);
info->overflowInsns = oldOverflow;
return valueType;
@@ -639,7 +639,7 @@
{
int oldPedantic = info->pedanticArith;
ILMachineType valueType;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
valueType = ILNode_GenValue(node->expr, info);
info->pedanticArith = oldPedantic;
return valueType;
@@ -654,7 +654,7 @@
ILMachineType valueType;
info->pedanticArith = 0;
valueType = ILNode_GenValue(node->expr, info);
- info->overflowInsns = oldPedantic;
+ info->pedanticArith = oldPedantic;
return valueType;
}
@@ -1970,7 +1970,7 @@
ILNode_GenThen(ILNode_Overflow)
{
int oldOverflow = info->overflowInsns;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
ILNode_GenThen(node->expr, info, label);
info->overflowInsns = oldOverflow;
}
@@ -1981,7 +1981,7 @@
ILNode_GenElse(ILNode_Overflow)
{
int oldOverflow = info->overflowInsns;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
ILNode_GenElse(node->expr, info, label);
info->overflowInsns = oldOverflow;
}
@@ -2014,7 +2014,7 @@
ILNode_GenThen(ILNode_Pedantic)
{
int oldPedantic = info->pedanticArith;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
ILNode_GenThen(node->expr, info, label);
info->pedanticArith = oldPedantic;
}
@@ -2025,7 +2025,7 @@
ILNode_GenElse(ILNode_Pedantic)
{
int oldPedantic = info->pedanticArith;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
ILNode_GenElse(node->expr, info, label);
info->pedanticArith = oldPedantic;
}
@@ -2359,7 +2359,7 @@
{
int oldOverflow = info->overflowInsns;
ILMachineType valueType;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
valueType = Prepare_SubExpr((ILNode_LValueUnaryExpr *)node,
info, data1,
data2);
info->overflowInsns = oldOverflow;
@@ -2387,7 +2387,7 @@
{
int oldPedantic = info->pedanticArith;
ILMachineType valueType;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
valueType = Prepare_SubExpr((ILNode_LValueUnaryExpr *)node,
info, data1,
data2);
info->pedanticArith = oldPedantic;
@@ -2459,7 +2459,7 @@
{
int oldOverflow = info->overflowInsns;
ILMachineType valueType;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
valueType = GetAndPrepare_SubExpr((ILNode_LValueUnaryExpr *)node,
info,
leave, data1, data2);
info->overflowInsns = oldOverflow;
@@ -2487,7 +2487,7 @@
{
int oldPedantic = info->pedanticArith;
ILMachineType valueType;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
valueType = GetAndPrepare_SubExpr((ILNode_LValueUnaryExpr *)node,
info,
leave, data1, data2);
info->pedanticArith = oldPedantic;
@@ -2582,7 +2582,7 @@
ILNode_Store(ILNode_Overflow)
{
int oldOverflow = info->overflowInsns;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
Store_SubExpr((ILNode_LValueUnaryExpr *)node, info, leave, data1,
data2);
info->overflowInsns = oldOverflow;
}
@@ -2604,7 +2604,7 @@
ILNode_Store(ILNode_Pedantic)
{
int oldPedantic = info->pedanticArith;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
Store_SubExpr((ILNode_LValueUnaryExpr *)node, info, leave, data1,
data2);
info->pedanticArith = oldPedantic;
}
@@ -2678,7 +2678,7 @@
{
int oldOverflow = info->overflowInsns;
int result;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
result = ILNode_EvalConst(node->expr, info, value);
info->overflowInsns = oldOverflow;
return result;
@@ -2704,7 +2704,7 @@
{
int oldPedantic = info->pedanticArith;
int result;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
result = ILNode_EvalConst(node->expr, info, value);
info->pedanticArith = oldPedantic;
return result;
Index: codegen/cg_stmt.tc
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/codegen/cg_stmt.tc,v
retrieving revision 1.46
retrieving revision 1.47
diff -u -b -r1.46 -r1.47
--- codegen/cg_stmt.tc 5 May 2007 15:56:41 -0000 1.46
+++ codegen/cg_stmt.tc 1 Jun 2007 11:08:50 -0000 1.47
@@ -1456,7 +1456,7 @@
ILGenOutOfMemory(info);
}
entry->name = node->name;
- entry->defined = 1;
+ entry->defined = -1;
entry->crossedTry = 0;
entry->loopStackSize = info->loopStackSize;
entry->scopeLevel = info->scopeLevel;
@@ -1630,7 +1630,7 @@
/* Undefined label reference that is crossing a scope
boundary */
if(tryScope)
{
- entry->crossedTry = 1;
+ entry->crossedTry = -1;
}
entry->scopeLevel = info->scopeLevel;
prev = entry;
Index: codegen/jv_cast.tc
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/codegen/jv_cast.tc,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -b -r1.7 -r1.8
--- codegen/jv_cast.tc 17 Mar 2002 10:41:47 -0000 1.7
+++ codegen/jv_cast.tc 1 Jun 2007 11:08:50 -0000 1.8
@@ -39,7 +39,7 @@
ILMachineType toType)
{
int overflow = info->overflowInsns;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
JavaGenCast(info, fromType, toType);
info->overflowInsns = overflow;
}
Index: codegen/jv_misc.tc
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/codegen/jv_misc.tc,v
retrieving revision 1.30
retrieving revision 1.31
diff -u -b -r1.30 -r1.31
--- codegen/jv_misc.tc 7 Nov 2003 00:12:36 -0000 1.30
+++ codegen/jv_misc.tc 1 Jun 2007 11:08:50 -0000 1.31
@@ -33,7 +33,7 @@
JavaGenDiscard(ILNode_Overflow)
{
int oldOverflow = info->overflowInsns;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
JavaGenDiscard(node->expr, info);
info->overflowInsns = oldOverflow;
}
@@ -55,7 +55,7 @@
JavaGenDiscard(ILNode_Pedantic)
{
int oldPedantic = info->pedanticArith;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
JavaGenDiscard(node->expr, info);
info->pedanticArith = oldPedantic;
}
@@ -222,7 +222,7 @@
{
int oldOverflow = info->overflowInsns;
ILMachineType valueType;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
valueType = JavaGenValue(node->expr, info);
info->overflowInsns = oldOverflow;
return valueType;
@@ -248,7 +248,7 @@
{
int oldPedantic = info->pedanticArith;
ILMachineType valueType;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
valueType = JavaGenValue(node->expr, info);
info->pedanticArith = oldPedantic;
return valueType;
@@ -263,7 +263,7 @@
ILMachineType valueType;
info->pedanticArith = 0;
valueType = JavaGenValue(node->expr, info);
- info->overflowInsns = oldPedantic;
+ info->pedanticArith = oldPedantic;
return valueType;
}
@@ -1797,7 +1797,7 @@
JavaGenThen(ILNode_Overflow)
{
int oldOverflow = info->overflowInsns;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
JavaGenThen(node->expr, info, label);
info->overflowInsns = oldOverflow;
}
@@ -1808,7 +1808,7 @@
JavaGenElse(ILNode_Overflow)
{
int oldOverflow = info->overflowInsns;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
JavaGenElse(node->expr, info, label);
info->overflowInsns = oldOverflow;
}
@@ -1841,7 +1841,7 @@
JavaGenThen(ILNode_Pedantic)
{
int oldPedantic = info->pedanticArith;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
JavaGenThen(node->expr, info, label);
info->pedanticArith = oldPedantic;
}
@@ -1852,7 +1852,7 @@
JavaGenElse(ILNode_Pedantic)
{
int oldPedantic = info->pedanticArith;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
JavaGenElse(node->expr, info, label);
info->pedanticArith = oldPedantic;
}
@@ -2201,7 +2201,7 @@
{
int oldOverflow = info->overflowInsns;
ILMachineType valueType;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
valueType = JavaPrepare_SubExpr((ILNode_LValueUnaryExpr *)node,
info,
data1, data2);
info->overflowInsns = oldOverflow;
@@ -2229,7 +2229,7 @@
{
int oldPedantic = info->pedanticArith;
ILMachineType valueType;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
valueType = JavaPrepare_SubExpr((ILNode_LValueUnaryExpr *)node,
info,
data1, data2);
info->pedanticArith = oldPedantic;
@@ -2297,7 +2297,7 @@
{
int oldOverflow = info->overflowInsns;
ILMachineType valueType;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
valueType = JavaGetAndPrepare_SubExpr((ILNode_LValueUnaryExpr *)node,
info,
leave, data1, data2);
info->overflowInsns = oldOverflow;
@@ -2325,7 +2325,7 @@
{
int oldPedantic = info->pedanticArith;
ILMachineType valueType;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
valueType = JavaGetAndPrepare_SubExpr((ILNode_LValueUnaryExpr *)node,
info,
leave, data1, data2);
info->pedanticArith = oldPedantic;
@@ -2387,7 +2387,7 @@
JavaStore(ILNode_Overflow)
{
int oldOverflow = info->overflowInsns;
- info->overflowInsns = 1;
+ info->overflowInsns = -1;
JavaStore_SubExpr((ILNode_LValueUnaryExpr *)node,
info, leave, data1, data2);
info->overflowInsns = oldOverflow;
@@ -2411,7 +2411,7 @@
JavaStore(ILNode_Pedantic)
{
int oldPedantic = info->pedanticArith;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
JavaStore_SubExpr((ILNode_LValueUnaryExpr *)node,
info, leave, data1, data2);
info->pedanticArith = oldPedantic;
Index: codegen/jv_stmt.tc
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/codegen/jv_stmt.tc,v
retrieving revision 1.20
retrieving revision 1.21
diff -u -b -r1.20 -r1.21
--- codegen/jv_stmt.tc 14 Oct 2003 05:24:17 -0000 1.20
+++ codegen/jv_stmt.tc 1 Jun 2007 11:08:51 -0000 1.21
@@ -924,7 +924,7 @@
ILGenOutOfMemory(info);
}
entry->name = node->name;
- entry->defined = 1;
+ entry->defined = -1;
entry->crossedTry = 0;
entry->loopStackSize = info->loopStackSize;
entry->scopeLevel = info->scopeLevel;
Index: cscc/cs_main.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/cs_main.c,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -b -r1.23 -r1.24
--- cscc/cs_main.c 24 May 2007 13:51:14 -0000 1.23
+++ cscc/cs_main.c 1 Jun 2007 11:08:51 -0000 1.24
@@ -109,7 +109,7 @@
void CCPluginSemAnalysis(void)
{
/* Perform type gathering */
- CCCodeGen.typeGather = 1;
+ CCCodeGen.typeGather = -1;
CCParseTree = CSTypeGather(&CCCodeGen, CCCodeGen.globalScope,
CCParseTree);
CCCodeGen.typeGather = 0;
Index: cscc/java_main.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/java_main.c,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- cscc/java_main.c 24 May 2007 13:51:15 -0000 1.2
+++ cscc/java_main.c 1 Jun 2007 11:08:51 -0000 1.3
@@ -66,7 +66,7 @@
void CCPluginSemAnalysis(void)
{
/* Perform type gathering */
- CCCodeGen.typeGather = 1;
+ CCCodeGen.typeGather = -1;
CCParseTree = JavaTypeGather(&CCCodeGen, CCCodeGen.globalScope,
CCParseTree);
CCCodeGen.typeGather = 0;
Index: cscc/vb_main.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/vb_main.c,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- cscc/vb_main.c 24 May 2007 13:51:15 -0000 1.2
+++ cscc/vb_main.c 1 Jun 2007 11:08:51 -0000 1.3
@@ -68,7 +68,7 @@
void CCPluginSemAnalysis(void)
{
/* Perform type gathering */
- CCCodeGen.typeGather = 1;
+ CCCodeGen.typeGather = -1;
CCParseTree = CSTypeGather(&CCCodeGen, CCCodeGen.globalScope,
CCParseTree);
CCCodeGen.typeGather = 0;
Index: cscc/csdoc.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/csdoc.c,v
retrieving revision 1.25
retrieving revision 1.26
diff -u -b -r1.25 -r1.26
--- cscc/csdoc.c 24 May 2007 13:51:14 -0000 1.25
+++ cscc/csdoc.c 1 Jun 2007 11:08:51 -0000 1.26
@@ -90,7 +90,7 @@
void CCPluginSemAnalysis(void)
{
/* Perform type gathering */
- CCCodeGen.typeGather = 1;
+ CCCodeGen.typeGather = -1;
CCParseTree = CSTypeGather(&CCCodeGen, CCCodeGen.globalScope,
CCParseTree);
CCCodeGen.typeGather = 0;
Index: cscc/c/c_oper.tc
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/c/c_oper.tc,v
retrieving revision 1.43
retrieving revision 1.44
diff -u -b -r1.43 -r1.44
--- cscc/c/c_oper.tc 15 Mar 2004 01:37:18 -0000 1.43
+++ cscc/c/c_oper.tc 1 Jun 2007 11:08:51 -0000 1.44
@@ -2022,8 +2022,8 @@
CSemValue value;
int overflow = info->overflowInsns;
int changed = info->overflowChanged;
- info->overflowInsns = 1;
- info->overflowChanged = 1;
+ info->overflowInsns = -1;
+ info->overflowChanged = -1;
value = ILNode_CSemAnalysis(node->expr, info, &(node->expr), stmtLevel);
info->overflowInsns = overflow;
info->overflowChanged = changed;
@@ -2039,7 +2039,7 @@
int overflow = info->overflowInsns;
int changed = info->overflowChanged;
info->overflowInsns = 0;
- info->overflowChanged = 1;
+ info->overflowChanged = -1;
value = ILNode_CSemAnalysis(node->expr, info, &(node->expr), stmtLevel);
info->overflowInsns = overflow;
info->overflowChanged = changed;
@@ -2071,8 +2071,8 @@
CAddress value;
int overflow = info->overflowInsns;
int changed = info->overflowChanged;
- info->overflowInsns = 1;
- info->overflowChanged = 1;
+ info->overflowInsns = -1;
+ info->overflowChanged = -1;
if(yyisa(node->expr, ILNode_LValue))
{
value = ILNode_CGenAddress((ILNode_LValue *)(node->expr), info);
@@ -2095,7 +2095,7 @@
int overflow = info->overflowInsns;
int changed = info->overflowChanged;
info->overflowInsns = 0;
- info->overflowChanged = 1;
+ info->overflowChanged = -1;
if(yyisa(node->expr, ILNode_LValue))
{
value = ILNode_CGenAddress((ILNode_LValue *)(node->expr), info);
Index: cscc/common/cc_errors.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/common/cc_errors.c,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- cscc/common/cc_errors.c 5 May 2007 15:56:41 -0000 1.3
+++ cscc/common/cc_errors.c 1 Jun 2007 11:08:51 -0000 1.4
@@ -267,7 +267,7 @@
construct);
}
++(info->unsafeLevel);
- info->hasUnsafe = 1;
+ info->hasUnsafe = -1;
}
void CCUnsafeLeave(ILGenInfo *info)
Index: cscc/common/cc_main.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/common/cc_main.c,v
retrieving revision 1.38
retrieving revision 1.39
diff -u -b -r1.38 -r1.39
--- cscc/common/cc_main.c 24 May 2007 13:51:15 -0000 1.38
+++ cscc/common/cc_main.c 1 Jun 2007 11:08:51 -0000 1.39
@@ -168,7 +168,7 @@
return 1;
}
- CCCodeGen.semAnalysis = 1;
+ CCCodeGen.semAnalysis = -1;
CCCodeGen.optimizeFlag= (0x03) & optimize_flag;
CCPluginSemAnalysis();
CCCodeGen.semAnalysis = 0;
@@ -522,12 +522,12 @@
CCStringListGetValue(extension_flags,
num_extension_flags,
"target-assembly-name"),
outfile, useBuiltinLibrary);
- CCCodeGen.debugFlag = debug_flag;
+ CCCodeGen.debugFlag = debug_flag ? -1 : 0;
/* Set the default "checked" state */
if(CCStringListContains(extension_flags, num_extension_flags,
"checked"))
{
- CCCodeGen.overflowInsns = 1;
+ CCCodeGen.overflowInsns = -1;
}
else if(CCStringListContains(extension_flags, num_extension_flags,
"unchecked"))
Index: cscc/common/cc_preproc.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/common/cc_preproc.c,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- cscc/common/cc_preproc.c 5 May 2007 15:56:41 -0000 1.6
+++ cscc/common/cc_preproc.c 1 Jun 2007 11:08:51 -0000 1.7
@@ -1171,7 +1171,7 @@
scope = (CCPreProcScope
*)ILMalloc(sizeof(CCPreProcScope));
if(scope)
{
- scope->active = cond;
+ scope->active = cond ? -1 : 0;
scope->previous = 0;
if(preproc->currentScope)
{
@@ -1180,7 +1180,7 @@
}
else
{
- scope->ancestor = 1;
+ scope->ancestor = -1;
}
scope->sawElse = 0;
scope->number = lines[line].number;
@@ -1209,7 +1209,7 @@
}
else
{
- preproc->currentScope->active =
cond;
+ preproc->currentScope->active =
cond ? -1 : 0;
}
if(preproc->currentScope->sawElse)
{
@@ -1238,14 +1238,14 @@
}
else
{
- preproc->currentScope->active =
1;
+ preproc->currentScope->active =
-1;
}
if(preproc->currentScope->sawElse)
{
Message(&(lines[line]),
_("#else used after #else"), 0);
preproc->error = 1;
}
- preproc->currentScope->sawElse = 1;
+ preproc->currentScope->sawElse = -1;
}
else
{
Index: cscc/csharp/cs_cast.tc
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/csharp/cs_cast.tc,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -b -r1.13 -r1.14
--- cscc/csharp/cs_cast.tc 3 May 2007 20:08:46 -0000 1.13
+++ cscc/csharp/cs_cast.tc 1 Jun 2007 11:08:51 -0000 1.14
@@ -98,8 +98,8 @@
"unchecked(x)" is required around the expression */
ILEvalValue evalValue2;
int result;
- info->overflowInsns = 1;
- info->overflowChanged = 1;
+ info->overflowInsns = -1;
+ info->overflowChanged = -1;
result = ILNode_EvalConst(*parent, info, &evalValue2);
info->overflowInsns = 0;
info->overflowChanged = 0;
Index: cscc/csharp/cs_invoke.tc
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/csharp/cs_invoke.tc,v
retrieving revision 1.31
retrieving revision 1.32
diff -u -b -r1.31 -r1.32
--- cscc/csharp/cs_invoke.tc 5 May 2007 15:56:41 -0000 1.31
+++ cscc/csharp/cs_invoke.tc 1 Jun 2007 11:08:51 -0000 1.32
@@ -500,7 +500,7 @@
savedNode->expr1 = savedChild1;
savedNode->expr2 = savedChild2;
- info->inSemStatic = 1;
+ info->inSemStatic = -1;
method = ILNode_SemAnalysis(node->expr1,info, &(node->expr1));
info->inSemStatic = 0;
Index: cscc/csharp/cs_lookup.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/csharp/cs_lookup.c,v
retrieving revision 1.35
retrieving revision 1.36
diff -u -b -r1.35 -r1.36
--- cscc/csharp/cs_lookup.c 30 May 2007 09:49:16 -0000 1.35
+++ cscc/csharp/cs_lookup.c 1 Jun 2007 11:08:51 -0000 1.36
@@ -1393,8 +1393,8 @@
ILNode *alias = ((ILNode_UsingAlias
*)aliasNode)->ref;
int savedState = genInfo->inSemType;
- genInfo->resolvingAlias = 1;
- genInfo->inSemType = 1;
+ genInfo->resolvingAlias = -1;
+ genInfo->inSemType = -1;
value = ILNode_SemAnalysis(alias,
genInfo, &aliasNode);
genInfo->inSemType = savedState;
genInfo->resolvingAlias = 0;
Index: cscc/csharp/cs_lvalue.tc
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/csharp/cs_lvalue.tc,v
retrieving revision 1.61
retrieving revision 1.62
diff -u -b -r1.61 -r1.62
--- cscc/csharp/cs_lvalue.tc 24 May 2007 13:51:15 -0000 1.61
+++ cscc/csharp/cs_lvalue.tc 1 Jun 2007 11:08:52 -0000 1.62
@@ -998,7 +998,7 @@
CSSemValue value;
int savedState=info->inSemType;
- info->inSemType=1;
+ info->inSemType = -1;
/* Resolve the simple name */
value = CSResolveSimpleNameQuiet(info, (ILNode *)node, node->name, 1);
info->inSemType=savedState;
@@ -1025,7 +1025,7 @@
const char *name;
/* Resolve the simple name */
- info->inSemType=1;
+ info->inSemType = -1;
value = CSResolveSimpleNameQuiet(info, (ILNode *)node, node->name, 1);
info->inSemType=savedState;
@@ -1043,9 +1043,9 @@
name = ILInternAppendedString
(ILInternString(node->name, strlen(node->name)),
ILInternString("Attribute", 9)).string;
- info->inSemType=1;
+ info->inSemType = -1;
savedAliasState = info->resolvingAlias;
- info->resolvingAlias = 1;
+ info->resolvingAlias = -1;
value = CSResolveSimpleNameQuiet(info, (ILNode *)node, name, 1);
info->resolvingAlias = savedAliasState;
info->inSemType=savedState;
@@ -1105,7 +1105,7 @@
}
/* Restrict lookups for types only (ie namespaces , types, nested types
*/
- info->inSemType = 1;
+ info->inSemType = -1;
/* Get the semantic value for the left part of the identifier */
value = ILNode_SemAnalysisType(node->left, info, &(node->left));
@@ -1140,7 +1140,7 @@
int savedState = info->inSemType;
/* Restrict lookups for types only (ie namespaces , types, nested types
*/
- info->inSemType = 1;
+ info->inSemType = -1;
/* Get the semantic value for the left part of the identifier */
value = ILNode_SemAnalysis(node->left, info, &(node->left));
@@ -1323,7 +1323,7 @@
return value;
}
- info->inSemType=1;
+ info->inSemType = -1;
/* Get the semantic value for the left part of the identifier */
value = ILNode_SemAnalysisType(node->expr1, info, &(node->expr1));
Index: cscc/csharp/cs_oper.tc
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/csharp/cs_oper.tc,v
retrieving revision 1.50
retrieving revision 1.51
diff -u -b -r1.50 -r1.51
--- cscc/csharp/cs_oper.tc 19 Jul 2004 15:30:58 -0000 1.50
+++ cscc/csharp/cs_oper.tc 1 Jun 2007 11:08:52 -0000 1.51
@@ -1617,7 +1617,7 @@
ILNode_TypeOf *typeofNode;
int savedState=info->inAttrArg;
- info->inAttrArg=1;
+ info->inAttrArg = -1;
/* Special case: types can be used as attribute constants */
if(yyisa(node->expr, ILNode_TypeOf))
@@ -2512,8 +2512,8 @@
CSSemValue value;
int overflow = info->overflowInsns;
int changed = info->overflowChanged;
- info->overflowInsns = 1;
- info->overflowChanged = 1;
+ info->overflowInsns = -1;
+ info->overflowChanged = -1;
value = ILNode_SemAnalysis(node->expr, info, &(node->expr));
info->overflowInsns = overflow;
info->overflowChanged = changed;
@@ -2529,7 +2529,7 @@
int overflow = info->overflowInsns;
int changed = info->overflowChanged;
info->overflowInsns = 0;
- info->overflowChanged = 1;
+ info->overflowChanged = -1;
value = ILNode_SemAnalysis(node->expr, info, &(node->expr));
info->overflowInsns = overflow;
info->overflowChanged = changed;
@@ -2543,7 +2543,7 @@
{
CSSemValue value;
int pedantic = info->pedanticArith;
- info->pedanticArith = 1;
+ info->pedanticArith = -1;
value = ILNode_SemAnalysis(node->expr, info, &(node->expr));
info->pedanticArith = pedantic;
return value;
Index: image/winres_reader.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/image/winres_reader.c,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- image/winres_reader.c 23 Dec 2003 21:26:29 -0000 1.4
+++ image/winres_reader.c 1 Jun 2007 11:08:52 -0000 1.5
@@ -169,7 +169,7 @@
}
return 0;
}
- dir->isDirectory = 1;
+ dir->isDirectory = -1;
dir->isMallocData = 0;
dir->isNumeric = 0;
dir->name = name;
Index: image/winres_writer.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/image/winres_writer.c,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- image/winres_writer.c 23 Dec 2003 21:26:29 -0000 1.2
+++ image/winres_writer.c 1 Jun 2007 11:08:52 -0000 1.3
@@ -40,7 +40,7 @@
ILFree(section);
return 0;
}
- section->rootDirectory->isDirectory = 1;
+ section->rootDirectory->isDirectory = -1;
section->rootDirectory->isMallocData = 0;
section->rootDirectory->isNumeric = 0;
section->rootDirectory->name = 0;
@@ -91,7 +91,7 @@
{
return 0;
}
- entry->isDirectory = (name[posn] == '/');
+ entry->isDirectory = (name[posn] == '/') ? -1 : 0;
entry->isMallocData = 0;
entry->isNumeric = isNumeric;
entry->name = ILDupNString(name, posn);
@@ -212,7 +212,7 @@
{
return 0;
}
- entry->isMallocData = 1;
+ entry->isMallocData = -1;
entry->data = newData;
ILMemCpy(newData + entry->length, buffer, len);
entry->length += (unsigned long)(long)len;
| [Prev in Thread] |
Current Thread |
[Next in Thread] |
- [dotgnu-pnet-commits] pnet ChangeLog codegen/cg_gen.c codegen/cg_misc...,
Klaus Treichel <=