[Dotgnu-pnet-commits] CVS: pnet/cscc/csharp cs_decls.tc,1.27,1.28

[Rhys Weatherley <address@hidden>]

Update of /cvsroot/dotgnu-pnet/pnet/cscc/csharp
In directory subversions:/tmp/cvs-serv13385/cscc/csharp

Modified Files:
        cs_decls.tc 
Log Message:


Stop at 3 octal digits or 2 hex digits when processing escape sequences
inside strings in the assembler.


Index: cs_decls.tc
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/cscc/csharp/cs_decls.tc,v
retrieving revision 1.27
retrieving revision 1.28
diff -C2 -r1.27 -r1.28
*** cs_decls.tc 21 Nov 2002 05:25:38 -0000      1.27
--- cs_decls.tc 28 Nov 2002 00:06:56 -0000      1.28
***************
*** 635,638 ****
--- 635,639 ----
        CSSemValue value;
        ILEvalValue evalValue;
+       int flag;
  
        /* Determine if we have already visited this node */
***************
*** 702,706 ****
  
                /* Check that the literal value is actually constant */
!               if(!ILNode_EvalConst(node->initializer, info, &evalValue) ||
                   !ILGenCastConst(info, &evalValue, evalValue.valueType,
                     ILTypeToMachineType(ILField_Type(node->fieldInfo))))
--- 703,713 ----
  
                /* Check that the literal value is actually constant */
!               flag = ILNode_EvalConst(node->initializer, info, &evalValue);
!               if(!strcmp(ILField_Name(node->fieldInfo), "TicksPerDay"))
!               {
!                       printf("XXX - %d - %Ld\n", (int)(evalValue.valueType),
!                              evalValue.un.i8Value);
!               }
!               if(!flag ||
                   !ILGenCastConst(info, &evalValue, evalValue.valueType,
                     ILTypeToMachineType(ILField_Type(node->fieldInfo))))