[Dotgnu-pnet-commits] CVS: pnet/engine verify.c,1.37,1.38

[Gopal.V <address@hidden>]

Update of /cvsroot/dotgnu-pnet/pnet/engine
In directory subversions:/tmp/cvs-serv10407/engine

Modified Files:
        verify.c 
Log Message:
fix bug 1916 in savannah


Index: verify.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/engine/verify.c,v
retrieving revision 1.37
retrieving revision 1.38
diff -C2 -r1.37 -r1.38
*** verify.c    17 Oct 2002 05:03:51 -0000      1.37
--- verify.c    8 Dec 2002 22:34:35 -0000       1.38
***************
*** 391,394 ****
--- 391,410 ----
                        default: break;
                }
+ 
+               if(!unsafeAllowed)
+               {
+                       return 0;
+               }
+ 
+               /* Allow a native int to be assigned to a complex type */
+               if(type != 0 && ILType_IsComplex(type) && 
+                                               item->engineType == 
ILEngineType_I)
+               {
+                       if(ILType_Kind(type) == IL_TYPE_COMPLEX_PTR ||
+                         ILType_Kind(type) == IL_TYPE_COMPLEX_BYREF) 
+                       {
+                               return 1;
+                       }
+               }
                return 0;
        }