authorgravatar for sahnvour@pm.meSahnvour <sahnvour@pm.me> 2019-03-19 22:09:12+01:00
committergravatar for sahnvour@pm.meSahnvour <sahnvour@pm.me> 2019-03-19 22:09:12+01:00
log27d5e1f36cf7f7bd9345aba57d092206dc9e249b
tree5a7d50843bf9276dbecbdab40678fb6300395892
parentc17b1635ca40488a0b0a804126d0bdd2212bdf6b

c_abi: add some tests for int and float parameter passing potentially using both registers and stack


2 files changed, 44 insertions(+), 0 deletions(-)

test/stage1/c_abi/cfuncs.c+20
......@@ -18,9 +18,11 @@ void zig_i8(int8_t);
1818void zig_i16(int16_t);
1919void zig_i32(int32_t);
2020void zig_i64(int64_t);
21void zig_five_integers(int32_t, int32_t, int32_t, int32_t, int32_t);
2122
2223void zig_f32(float);
2324void zig_f64(double);
25void zig_five_floats(float, float, float, float, float);
2426
2527void zig_ptr(void *);
2628
......@@ -71,9 +73,11 @@ void run_c_tests(void) {
7173 zig_i16(-2);
7274 zig_i32(-3);
7375 zig_i64(-4);
76 zig_five_integers(12, 34, 56, 78, 90);
7477
7578 zig_f32(12.34f);
7679 zig_f64(56.78);
80 zig_five_floats(1.0f, 2.0f, 3.0f, 4.0f, 5.0f);
7781
7882 zig_ptr((void*)0xdeadbeefL);
7983
......@@ -156,6 +160,22 @@ void c_bool(bool x) {
156160 assert_or_panic(x);
157161}
158162
163void c_five_integers(int32_t a, int32_t b, int32_t c, int32_t d, int32_t e) {
164 assert_or_panic(a == 12);
165 assert_or_panic(b == 34);
166 assert_or_panic(c == 56);
167 assert_or_panic(d == 78);
168 assert_or_panic(e == 90);
169}
170
171void c_five_floats(float a, float b, float c, float d, float e) {
172 assert_or_panic(a == 1.0);
173 assert_or_panic(b == 2.0);
174 assert_or_panic(c == 3.0);
175 assert_or_panic(d == 4.0);
176 assert_or_panic(e == 5.0);
177}
178
159179void c_array(uint8_t x[10]) {
160180 assert_or_panic(x[0] == '1');
161181 assert_or_panic(x[1] == '2');
test/stage1/c_abi/main.zig+24
......@@ -20,6 +20,17 @@ extern fn c_i16(i16) void;
2020extern fn c_i32(i32) void;
2121extern fn c_i64(i64) void;
2222
23// On windows x64, the first 4 are passed via registers, others on the stack.
24extern fn c_five_integers(i32, i32, i32, i32, i32) void;
25
26export fn zig_five_integers(a: i32, b: i32, c: i32, d: i32, e: i32) void {
27 expect(a == 12);
28 expect(b == 34);
29 expect(c == 56);
30 expect(d == 78);
31 expect(e == 90);
32}
33
2334test "C ABI integers" {
2435 c_u8(0xff);
2536 c_u16(0xfffe);
......@@ -30,6 +41,7 @@ test "C ABI integers" {
3041 c_i16(-2);
3142 c_i32(-3);
3243 c_i64(-4);
44 c_five_integers(12, 34, 56, 78, 90);
3345}
3446
3547export fn zig_u8(x: u8) void {
......@@ -60,9 +72,21 @@ export fn zig_i64(x: i64) void {
6072extern fn c_f32(f32) void;
6173extern fn c_f64(f64) void;
6274
75// On windows x64, the first 4 are passed via registers, others on the stack.
76extern fn c_five_floats(f32, f32, f32, f32, f32) void;
77
78export fn zig_five_floats(a: f32, b: f32, c: f32, d: f32, e: f32) void {
79 expect(a == 1.0);
80 expect(b == 2.0);
81 expect(c == 3.0);
82 expect(d == 4.0);
83 expect(e == 5.0);
84}
85
6386test "C ABI floats" {
6487 c_f32(12.34);
6588 c_f64(56.78);
89 c_five_floats(1.0, 2.0, 3.0, 4.0, 5.0);
6690}
6791
6892export fn zig_f32(x: f32) void {