* mono/io-layer/ChangeLog, mono/io-layer/atomic.h, mono/mini/mini-s390x.c,

[mono.git] / mono / mini / s390-abi.cs

diff --git a/mono/mini/s390-abi.cs b/mono/mini/s390-abi.cs
index ec404b10c83a4fa759d7bb1c42dbd29e502bc54f..9c8dc46f09654ce548da72cf7970ee5ec47c75a2 100644 (file)
--- a/mono/mini/s390-abi.cs
+++ b/mono/mini/s390-abi.cs
@@ -316,4 +316,38 @@ class Tests {
                        return 9;
        }
 
+       static float pass_double_ret_float(double a)
+       {
+               float b;
+               b = (float) a;
+               return b;
+       }
+
+       static int test_0_pass_double_ret_float ()
+       {
+               double a = 654.34;
+               float b = 654.34f;
+               if (pass_double_ret_float(a) == b)
+                       return 0;
+               else
+                       return 10;
+       }
+
+       static double pass_float_ret_double(float a)
+       {
+               double b;
+               b = (double) a;
+               return b;
+       }
+
+       static int test_0_pass_float_ret_double ()
+       {
+               float a = 654.34f;
+               double b = 654.34;
+               if (pass_float_ret_double(a) == b)
+                       return 0;
+               else
+                       return 11;
+       }
+
 }