Cosmos/Users/Orvid/IL2CPU Tester/CsTests/s390-abi.cs

367 lines
8.3 KiB
C#

using System;
/*
* Regression tests for the mono JIT.
*
* Each test needs to be of the form:
*
* static int test_<result>_<name> ();
*
* where <result> is an integer (the value that needs to be returned by
* the method to make it pass.
* <name> is a user-displayed name used to identify the test.
*
* The tests can be driven in two ways:
* *) running the program directly: Main() uses reflection to find and invoke
* the test methods (this is useful mostly to check that the tests are correct)
* *) with the --regression switch of the jit (this is the preferred way since
* all the tests will be run with optimizations on and off)
*
* The reflection logic could be moved to a .dll since we need at least another
* regression test file written in IL code to have better control on how
* the IL code looks.
*/
public partial class Tests
{
public struct TestStruct1
{
public int a;
}
public struct TestStruct2
{
public int a;
public int b;
}
public struct TestStruct3
{
public int a;
public int b;
public int c;
}
static void reg_struct(TestStruct1 regStruct)
{
regStruct.a = 1;
}
public static int test_0_regstruct()
{
TestStruct1 myStruct;
myStruct.a = 1;
reg_struct(myStruct);
if (myStruct.a == 1)
return 0;
else
return 1;
}
static int reg_struct_ret(TestStruct2 regStruct)
{
return regStruct.b;
}
public static int test_0_reg_return()
{
TestStruct2 myStruct;
myStruct.a = 0;
myStruct.b = 42;
if (reg_struct_ret(myStruct) == 42)
return 0;
return 2;
}
static int spill_regs(int a, int b, int c, int d, int e, int f)
{
return f;
}
public static int test_0_spill_regs()
{
if (spill_regs(1, 2, 3, 4, 5, 6) == 6)
return 0;
else
return 3;
}
static TestStruct3 spill_struct(TestStruct3 regStruct, int value)
{
regStruct.c = value;
return (regStruct);
}
static TestStruct3 ret_big_struct(int value_a, int value_c)
{
TestStruct3 regStruct = new TestStruct3();
regStruct.a = value_a;
regStruct.c = value_c;
return (regStruct);
}
static int spill_struct_void(TestStruct3 regStruct)
{
if (regStruct.c == 255)
return 0;
else
return 7;
}
static int receive_spill_struct(TestStruct2 regStruct)
{
if (regStruct.b == 181)
return 0;
else
return 8;
}
static int pass_spill_struct_big(int a, int b, int c, int d, int e, TestStruct3 regStruct)
{
int retVal;
retVal = receive_spill_struct_big(regStruct);
return retVal;
}
static int receive_spill_struct_big(TestStruct3 regStruct)
{
if (regStruct.c == 999)
return 0;
else
return 9;
}
static int receive_struct_spill(int a, int b, int c, int d, int e, TestStruct2 regStruct)
{
if (regStruct.b == 181)
return 0;
else
return 10;
}
static int receive_struct_spill_big(int a, int b, int c, int d, int e, TestStruct3 regStruct)
{
if (regStruct.c == 999)
return 0;
else
return 11;
}
static int pass_spill_struct(int a, int b, int c, int d, int e, TestStruct2 regStruct)
{
int retVal;
retVal = receive_spill_struct(regStruct);
return retVal;
}
static int pass_struct_spill(TestStruct2 regStruct)
{
int retVal;
retVal = receive_struct_spill(1, 2, 3, 4, 5, regStruct);
return retVal;
}
static int pass_struct_spill_big(TestStruct3 regStruct)
{
int retVal;
retVal = receive_struct_spill_big(1, 2, 3, 4, 5, regStruct);
return retVal;
}
static int pass_spill_struct_spill(int a, int b, int c, int d, int e, TestStruct2 regStruct)
{
int retVal;
retVal = receive_struct_spill(a, b, c, d, e, regStruct);
return retVal;
}
static int pass_spill_struct_spill_big(int a, int b, int c, int d, int e, TestStruct3 regStruct)
{
int retVal;
retVal = receive_struct_spill_big(a, b, c, d, e, regStruct);
return retVal;
}
public static int test_0_spill()
{
TestStruct3 myStruct;
myStruct.a = 64;
myStruct.b = 255;
myStruct.c = 127;
myStruct = spill_struct(myStruct, 99);
if (myStruct.c == 99)
return 0;
return myStruct.c;
}
public static int test_0_spill_void()
{
TestStruct3 myStruct;
myStruct.a = 0;
myStruct.b = 127;
myStruct.c = 255;
return (spill_struct_void(myStruct));
}
static int spill_struct_ret(TestStruct3 regStruct)
{
return (regStruct.c);
}
public static int test_0_spill_ret()
{
TestStruct3 myStruct;
myStruct.a = 0;
myStruct.b = 0;
myStruct.c = 69;
if (spill_struct_ret(myStruct) == 69)
return 0;
return 5;
}
static TestStruct2 struct_ret(TestStruct2 regStruct)
{
regStruct.a = -1;
regStruct.b = 72;
return (regStruct);
}
public static int test_0_struct_ret()
{
TestStruct2 myStruct;
myStruct.a = 99;
myStruct.b = 14;
myStruct = struct_ret(myStruct);
if (myStruct.b == 72)
return 0;
else
return myStruct.b;
}
static float TestSingle(float a, float b, float c)
{
return b;
}
public static int test_0_TestSingle()
{
float a = 3F; float b = 4.5F; float c = 900F;
if (TestSingle(a, b, c) == b)
return 0;
else
return 6;
}
public static int test_0_pass_spill()
{
TestStruct2 myStruct;
myStruct.a = 32;
myStruct.b = 181;
return (pass_spill_struct(1, 2, 3, 4, 5, myStruct));
}
public static int test_0_pass_spill_big()
{
TestStruct3 myStruct;
myStruct.a = 32;
myStruct.b = 181;
myStruct.c = 999;
return (pass_spill_struct_big(1, 2, 3, 4, 5, myStruct));
}
public static int test_0_pass_struct_spill()
{
TestStruct2 myStruct;
myStruct.a = 32;
myStruct.b = 181;
return (pass_struct_spill(myStruct));
}
public static int test_0_pass_struct_spill_big()
{
TestStruct3 myStruct;
myStruct.a = 32;
myStruct.b = 181;
myStruct.c = 999;
return (pass_struct_spill_big(myStruct));
}
public static int test_0_pass_ret_big_struct()
{
TestStruct3 myStruct;
myStruct = ret_big_struct(10, 132);
if (myStruct.c == 132)
return 0;
else
return 1;
}
public static int test_0_pass_spill_struct_spill()
{
TestStruct2 myStruct;
myStruct.a = 32;
myStruct.b = 181;
return (pass_spill_struct_spill(1, 2, 3, 4, 5, myStruct));
}
public static int test_0_pass_spill_struct_spill_big()
{
TestStruct3 myStruct;
myStruct.a = 32;
myStruct.b = 181;
myStruct.c = 999;
return (pass_spill_struct_spill_big(1, 2, 3, 4, 5, myStruct));
}
static long pass_long_odd(int a, long b)
{
return (b);
}
public static int test_0_pass_long_odd()
{
int a = 5;
long b = 9000;
if (pass_long_odd(a, b) == 9000)
return 0;
else
return 9;
}
static float pass_double_ret_float(double a)
{
float b;
b = (float)a;
return b;
}
public 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;
}
public 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;
}
}