[dotgnu-pnet-commits] pnet/engine jitc_obj.c

[Klaus Treichel]

CVSROOT:        /cvsroot/dotgnu-pnet
Module name:    pnet
Branch:         
Changes by:     Klaus Treichel <[EMAIL PROTECTED]>      06/04/17 17:57:14

Modified files:
        engine         : jitc_obj.c 

Log message:
        Missed these changes.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/dotgnu-pnet/pnet/engine/jitc_obj.c.diff?tr1=1.15&tr2=1.16&r1=text&r2=text

Patches:
Index: pnet/engine/jitc_obj.c
diff -u pnet/engine/jitc_obj.c:1.15 pnet/engine/jitc_obj.c:1.16
--- pnet/engine/jitc_obj.c:1.15 Mon Apr 17 17:39:44 2006
+++ pnet/engine/jitc_obj.c      Mon Apr 17 17:57:14 2006
@@ -129,7 +129,14 @@
        {
                _ILJitCheckNull(coder, base);
        }
-       return jit_insn_add_relative(coder->jitFunction, base, offset);
+       if(offset != 0)
+       {
+               return jit_insn_add_relative(coder->jitFunction, base, offset);
+       }
+       else
+       {
+               return base;
+       }
 }
 
 /*
@@ -167,7 +174,7 @@
        }
        if(jit_value_get_type(value) != type)
        {
-               value = jit_insn_convert(coder->jitFunction, value, type, 0);
+               value = _ILJitValueConvertImplicit(coder->jitFunction, value, 
type);
        }
        jit_insn_store_relative(coder->jitFunction, base, offset, value);
 }
@@ -550,7 +557,8 @@
         */
        _ILJitCheckNull(jitCoder, dest);
 
-       value = jit_insn_convert(jitCoder->jitFunction, value, 
_IL_JIT_TYPE_BYTE, 0);
+       value = _ILJitValueConvertImplicit(jitCoder->jitFunction, value,
+                                                                          
_IL_JIT_TYPE_BYTE);
        jit_insn_memset(jitCoder->jitFunction, dest, value, size);
        JITC_ADJUST(jitCoder, -3);
 }
@@ -600,9 +608,10 @@
        /* Allocate the object. */
        newObj = _ILJitAllocObjectGen(jitCoder, boxClass);
 
-       if(jit_value_get_type(value)!=jitType)
+       if(jit_value_get_type(value) != jitType)
        {
-               value = jit_insn_convert(jitCoder->jitFunction, value, jitType, 
1);
+               value = _ILJitValueConvertImplicit(jitCoder->jitFunction, value,
+                                                                               
   jitType);
        }
        /* Box a managed value */
        jit_insn_store_relative(jitCoder->jitFunction, newObj, 0, value);
@@ -624,7 +633,8 @@
        /* If the smallerType is smaller then the initiale type then convert to 
it. */
        if(jit_value_get_type(value) != jitType)
        {
-               value = jit_insn_convert(jitCoder->jitFunction, value, jitType, 
0);
+               value = _ILJitValueConvertImplicit(jitCoder->jitFunction, value,
+                                                                               
   jitType);
        }
        
        jit_insn_store_relative(jitCoder->jitFunction, newObj, 0, value);


_______________________________________________
dotgnu-pnet-commits mailing list
dotgnu-pnet-commits@gnu.org
http://lists.gnu.org/mailman/listinfo/dotgnu-pnet-commits