mirror of
https://github.com/ziglang/zig.git
synced 2024-11-27 15:42:49 +00:00
1030 lines
22 KiB
C
1030 lines
22 KiB
C
#include <complex.h>
|
|
#include <inttypes.h>
|
|
#include <stdbool.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
|
|
void zig_panic(void);
|
|
|
|
static void assert_or_panic(bool ok) {
|
|
if (!ok) {
|
|
zig_panic();
|
|
}
|
|
}
|
|
|
|
#if defined __powerpc__ && !defined _ARCH_PPC64
|
|
# define ZIG_PPC32
|
|
#endif
|
|
|
|
#if defined __riscv && defined _ILP32
|
|
# define ZIG_RISCV32
|
|
#endif
|
|
|
|
#ifdef __i386__
|
|
# define ZIG_NO_I128
|
|
#endif
|
|
|
|
#ifdef __arm__
|
|
# define ZIG_NO_I128
|
|
#endif
|
|
|
|
#ifdef __mips__
|
|
# define ZIG_NO_I128
|
|
#endif
|
|
|
|
#ifdef ZIG_PPC32
|
|
# define ZIG_NO_I128
|
|
#endif
|
|
|
|
#ifdef ZIG_RISCV32
|
|
# define ZIG_NO_I128
|
|
#endif
|
|
|
|
#ifdef __i386__
|
|
# define ZIG_NO_COMPLEX
|
|
#endif
|
|
|
|
#ifdef __mips__
|
|
# define ZIG_NO_COMPLEX
|
|
#endif
|
|
|
|
#ifdef __arm__
|
|
# define ZIG_NO_COMPLEX
|
|
#endif
|
|
|
|
#ifdef __powerpc__
|
|
# define ZIG_NO_COMPLEX
|
|
#endif
|
|
|
|
#ifdef __riscv
|
|
# define ZIG_NO_COMPLEX
|
|
#endif
|
|
|
|
#ifdef __x86_64__
|
|
#define ZIG_NO_RAW_F16
|
|
#endif
|
|
|
|
#ifdef __i386__
|
|
#define ZIG_NO_RAW_F16
|
|
#endif
|
|
|
|
#ifdef __mips__
|
|
#define ZIG_NO_RAW_F16
|
|
#endif
|
|
|
|
#ifdef __riscv
|
|
#define ZIG_NO_RAW_F16
|
|
#endif
|
|
|
|
#ifdef __wasm__
|
|
#define ZIG_NO_RAW_F16
|
|
#endif
|
|
|
|
#ifdef __powerpc__
|
|
#define ZIG_NO_RAW_F16
|
|
#endif
|
|
|
|
#ifdef __aarch64__
|
|
#define ZIG_NO_F128
|
|
#endif
|
|
|
|
#ifdef __arm__
|
|
#define ZIG_NO_F128
|
|
#endif
|
|
|
|
#ifdef __mips__
|
|
#define ZIG_NO_F128
|
|
#endif
|
|
|
|
#ifdef __riscv
|
|
#define ZIG_NO_F128
|
|
#endif
|
|
|
|
#ifdef __powerpc__
|
|
#define ZIG_NO_F128
|
|
#endif
|
|
|
|
#ifdef __APPLE__
|
|
#define ZIG_NO_F128
|
|
#endif
|
|
|
|
#ifndef ZIG_NO_I128
|
|
struct i128 {
|
|
__int128 value;
|
|
};
|
|
|
|
struct u128 {
|
|
unsigned __int128 value;
|
|
};
|
|
#endif
|
|
|
|
void zig_u8(uint8_t);
|
|
void zig_u16(uint16_t);
|
|
void zig_u32(uint32_t);
|
|
void zig_u64(uint64_t);
|
|
#ifndef ZIG_NO_I128
|
|
void zig_struct_u128(struct u128);
|
|
#endif
|
|
void zig_i8(int8_t);
|
|
void zig_i16(int16_t);
|
|
void zig_i32(int32_t);
|
|
void zig_i64(int64_t);
|
|
#ifndef ZIG_NO_I128
|
|
void zig_struct_i128(struct i128);
|
|
#endif
|
|
void zig_five_integers(int32_t, int32_t, int32_t, int32_t, int32_t);
|
|
|
|
void zig_f32(float);
|
|
void zig_f64(double);
|
|
void zig_longdouble(long double);
|
|
void zig_five_floats(float, float, float, float, float);
|
|
|
|
bool zig_ret_bool();
|
|
uint8_t zig_ret_u8();
|
|
uint16_t zig_ret_u16();
|
|
uint32_t zig_ret_u32();
|
|
uint64_t zig_ret_u64();
|
|
int8_t zig_ret_i8();
|
|
int16_t zig_ret_i16();
|
|
int32_t zig_ret_i32();
|
|
int64_t zig_ret_i64();
|
|
|
|
void zig_ptr(void *);
|
|
|
|
void zig_bool(bool);
|
|
|
|
// Note: These two functions match the signature of __mulsc3 and __muldc3 in compiler-rt (and libgcc)
|
|
float complex zig_cmultf_comp(float a_r, float a_i, float b_r, float b_i);
|
|
double complex zig_cmultd_comp(double a_r, double a_i, double b_r, double b_i);
|
|
|
|
float complex zig_cmultf(float complex a, float complex b);
|
|
double complex zig_cmultd(double complex a, double complex b);
|
|
|
|
struct BigStruct {
|
|
uint64_t a;
|
|
uint64_t b;
|
|
uint64_t c;
|
|
uint64_t d;
|
|
uint8_t e;
|
|
};
|
|
|
|
void zig_big_struct(struct BigStruct);
|
|
|
|
union BigUnion {
|
|
struct BigStruct a;
|
|
};
|
|
|
|
void zig_big_union(union BigUnion);
|
|
|
|
struct SmallStructInts {
|
|
uint8_t a;
|
|
uint8_t b;
|
|
uint8_t c;
|
|
uint8_t d;
|
|
};
|
|
|
|
void zig_small_struct_ints(struct SmallStructInts);
|
|
struct SmallStructInts zig_ret_small_struct_ints();
|
|
|
|
struct MedStructMixed {
|
|
uint32_t a;
|
|
float b;
|
|
float c;
|
|
uint32_t d;
|
|
};
|
|
|
|
void zig_med_struct_mixed(struct MedStructMixed);
|
|
struct MedStructMixed zig_ret_med_struct_mixed();
|
|
|
|
void zig_small_packed_struct(uint8_t);
|
|
#ifndef ZIG_NO_I128
|
|
void zig_big_packed_struct(__int128);
|
|
#endif
|
|
|
|
struct SplitStructInts {
|
|
uint64_t a;
|
|
uint8_t b;
|
|
uint32_t c;
|
|
};
|
|
void zig_split_struct_ints(struct SplitStructInts);
|
|
|
|
struct SplitStructMixed {
|
|
uint64_t a;
|
|
uint8_t b;
|
|
float c;
|
|
};
|
|
void zig_split_struct_mixed(struct SplitStructMixed);
|
|
struct SplitStructMixed zig_ret_split_struct_mixed();
|
|
|
|
struct BigStruct zig_big_struct_both(struct BigStruct);
|
|
|
|
typedef struct Vector3 {
|
|
float x;
|
|
float y;
|
|
float z;
|
|
} Vector3;
|
|
|
|
typedef struct Vector5 {
|
|
float x;
|
|
float y;
|
|
float z;
|
|
float w;
|
|
float q;
|
|
} Vector5;
|
|
|
|
typedef struct Rect {
|
|
uint32_t left;
|
|
uint32_t right;
|
|
uint32_t top;
|
|
uint32_t bottom;
|
|
} Rect;
|
|
|
|
void zig_multiple_struct_ints(struct Rect, struct Rect);
|
|
|
|
typedef struct FloatRect {
|
|
float left;
|
|
float right;
|
|
float top;
|
|
float bottom;
|
|
} FloatRect;
|
|
|
|
void zig_multiple_struct_floats(struct FloatRect, struct FloatRect);
|
|
|
|
void run_c_tests(void) {
|
|
zig_u8(0xff);
|
|
zig_u16(0xfffe);
|
|
zig_u32(0xfffffffd);
|
|
zig_u64(0xfffffffffffffffc);
|
|
|
|
#ifndef ZIG_NO_I128
|
|
{
|
|
struct u128 s = {0xfffffffffffffffc};
|
|
zig_struct_u128(s);
|
|
}
|
|
#endif
|
|
|
|
zig_i8(-1);
|
|
zig_i16(-2);
|
|
zig_i32(-3);
|
|
zig_i64(-4);
|
|
|
|
#ifndef ZIG_NO_I128
|
|
{
|
|
struct i128 s = {-6};
|
|
zig_struct_i128(s);
|
|
}
|
|
#endif
|
|
|
|
zig_five_integers(12, 34, 56, 78, 90);
|
|
|
|
zig_f32(12.34f);
|
|
zig_f64(56.78);
|
|
zig_longdouble(12.34l);
|
|
zig_five_floats(1.0f, 2.0f, 3.0f, 4.0f, 5.0f);
|
|
|
|
zig_ptr((void *)0xdeadbeefL);
|
|
|
|
zig_bool(true);
|
|
|
|
#ifndef ZIG_NO_COMPLEX
|
|
// TODO: Resolve https://github.com/ziglang/zig/issues/8465
|
|
//{
|
|
// float complex a = 1.25f + I * 2.6f;
|
|
// float complex b = 11.3f - I * 1.5f;
|
|
// float complex z = zig_cmultf(a, b);
|
|
// assert_or_panic(creal(z) == 1.5f);
|
|
// assert_or_panic(cimag(z) == 13.5f);
|
|
//}
|
|
|
|
{
|
|
double complex a = 1.25 + I * 2.6;
|
|
double complex b = 11.3 - I * 1.5;
|
|
double complex z = zig_cmultd(a, b);
|
|
assert_or_panic(creal(z) == 1.5);
|
|
assert_or_panic(cimag(z) == 13.5);
|
|
}
|
|
|
|
{
|
|
float a_r = 1.25f;
|
|
float a_i = 2.6f;
|
|
float b_r = 11.3f;
|
|
float b_i = -1.5f;
|
|
float complex z = zig_cmultf_comp(a_r, a_i, b_r, b_i);
|
|
assert_or_panic(creal(z) == 1.5f);
|
|
assert_or_panic(cimag(z) == 13.5f);
|
|
}
|
|
|
|
{
|
|
double a_r = 1.25;
|
|
double a_i = 2.6;
|
|
double b_r = 11.3;
|
|
double b_i = -1.5;
|
|
double complex z = zig_cmultd_comp(a_r, a_i, b_r, b_i);
|
|
assert_or_panic(creal(z) == 1.5);
|
|
assert_or_panic(cimag(z) == 13.5);
|
|
}
|
|
#endif
|
|
|
|
#if !defined __mips__ && !defined ZIG_PPC32
|
|
{
|
|
struct BigStruct s = {1, 2, 3, 4, 5};
|
|
zig_big_struct(s);
|
|
}
|
|
#endif
|
|
|
|
#if !defined __i386__ && !defined __arm__ && !defined __mips__ && \
|
|
!defined ZIG_PPC32 && !defined _ARCH_PPC64
|
|
{
|
|
struct SmallStructInts s = {1, 2, 3, 4};
|
|
zig_small_struct_ints(s);
|
|
}
|
|
#endif
|
|
|
|
#ifndef ZIG_NO_I128
|
|
{
|
|
__int128 s = 0;
|
|
s |= 1 << 0;
|
|
s |= (__int128)2 << 64;
|
|
zig_big_packed_struct(s);
|
|
}
|
|
#endif
|
|
|
|
{
|
|
uint8_t s = 0;
|
|
s |= 0 << 0;
|
|
s |= 1 << 2;
|
|
s |= 2 << 4;
|
|
s |= 3 << 6;
|
|
zig_small_packed_struct(s);
|
|
}
|
|
|
|
#if !defined __i386__ && !defined __arm__ && !defined __mips__ && \
|
|
!defined ZIG_PPC32 && !defined _ARCH_PPC64
|
|
{
|
|
struct SplitStructInts s = {1234, 100, 1337};
|
|
zig_split_struct_ints(s);
|
|
}
|
|
#endif
|
|
|
|
#if !defined __arm__ && !defined ZIG_PPC32 && !defined _ARCH_PPC64
|
|
{
|
|
struct MedStructMixed s = {1234, 100.0f, 1337.0f};
|
|
zig_med_struct_mixed(s);
|
|
}
|
|
#endif
|
|
|
|
#if !defined __i386__ && !defined __arm__ && !defined __mips__ && \
|
|
!defined ZIG_PPC32 && !defined _ARCH_PPC64
|
|
{
|
|
struct SplitStructMixed s = {1234, 100, 1337.0f};
|
|
zig_split_struct_mixed(s);
|
|
}
|
|
#endif
|
|
|
|
#if !defined __mips__ && !defined ZIG_PPC32
|
|
{
|
|
struct BigStruct s = {30, 31, 32, 33, 34};
|
|
struct BigStruct res = zig_big_struct_both(s);
|
|
assert_or_panic(res.a == 20);
|
|
assert_or_panic(res.b == 21);
|
|
assert_or_panic(res.c == 22);
|
|
assert_or_panic(res.d == 23);
|
|
assert_or_panic(res.e == 24);
|
|
}
|
|
#endif
|
|
|
|
#if !defined ZIG_PPC32 && !defined _ARCH_PPC64
|
|
{
|
|
struct Rect r1 = {1, 21, 16, 4};
|
|
struct Rect r2 = {178, 189, 21, 15};
|
|
zig_multiple_struct_ints(r1, r2);
|
|
}
|
|
#endif
|
|
|
|
#if !defined __mips__ && !defined ZIG_PPC32
|
|
{
|
|
struct FloatRect r1 = {1, 21, 16, 4};
|
|
struct FloatRect r2 = {178, 189, 21, 15};
|
|
zig_multiple_struct_floats(r1, r2);
|
|
}
|
|
#endif
|
|
|
|
{
|
|
assert_or_panic(zig_ret_bool() == 1);
|
|
|
|
assert_or_panic(zig_ret_u8() == 0xff);
|
|
assert_or_panic(zig_ret_u16() == 0xffff);
|
|
assert_or_panic(zig_ret_u32() == 0xffffffff);
|
|
assert_or_panic(zig_ret_u64() == 0xffffffffffffffff);
|
|
|
|
assert_or_panic(zig_ret_i8() == -1);
|
|
assert_or_panic(zig_ret_i16() == -1);
|
|
assert_or_panic(zig_ret_i32() == -1);
|
|
assert_or_panic(zig_ret_i64() == -1);
|
|
}
|
|
}
|
|
|
|
void c_u8(uint8_t x) {
|
|
assert_or_panic(x == 0xff);
|
|
}
|
|
|
|
void c_u16(uint16_t x) {
|
|
assert_or_panic(x == 0xfffe);
|
|
}
|
|
|
|
void c_u32(uint32_t x) {
|
|
assert_or_panic(x == 0xfffffffd);
|
|
}
|
|
|
|
void c_u64(uint64_t x) {
|
|
assert_or_panic(x == 0xfffffffffffffffcULL);
|
|
}
|
|
|
|
#ifndef ZIG_NO_I128
|
|
void c_struct_u128(struct u128 x) {
|
|
assert_or_panic(x.value == 0xfffffffffffffffcULL);
|
|
}
|
|
#endif
|
|
|
|
void c_i8(int8_t x) {
|
|
assert_or_panic(x == -1);
|
|
}
|
|
|
|
void c_i16(int16_t x) {
|
|
assert_or_panic(x == -2);
|
|
}
|
|
|
|
void c_i32(int32_t x) {
|
|
assert_or_panic(x == -3);
|
|
}
|
|
|
|
void c_i64(int64_t x) {
|
|
assert_or_panic(x == -4);
|
|
}
|
|
|
|
#ifndef ZIG_NO_I128
|
|
void c_struct_i128(struct i128 x) {
|
|
assert_or_panic(x.value == -6);
|
|
}
|
|
#endif
|
|
|
|
void c_f32(float x) {
|
|
assert_or_panic(x == 12.34f);
|
|
}
|
|
|
|
void c_f64(double x) {
|
|
assert_or_panic(x == 56.78);
|
|
}
|
|
|
|
void c_long_double(long double x) {
|
|
assert_or_panic(x == 12.34l);
|
|
}
|
|
|
|
void c_ptr(void *x) {
|
|
assert_or_panic(x == (void *)0xdeadbeefL);
|
|
}
|
|
|
|
void c_bool(bool x) {
|
|
assert_or_panic(x);
|
|
}
|
|
|
|
void c_five_integers(int32_t a, int32_t b, int32_t c, int32_t d, int32_t e) {
|
|
assert_or_panic(a == 12);
|
|
assert_or_panic(b == 34);
|
|
assert_or_panic(c == 56);
|
|
assert_or_panic(d == 78);
|
|
assert_or_panic(e == 90);
|
|
}
|
|
|
|
void c_five_floats(float a, float b, float c, float d, float e) {
|
|
assert_or_panic(a == 1.0);
|
|
assert_or_panic(b == 2.0);
|
|
assert_or_panic(c == 3.0);
|
|
assert_or_panic(d == 4.0);
|
|
assert_or_panic(e == 5.0);
|
|
}
|
|
|
|
float complex c_cmultf_comp(float a_r, float a_i, float b_r, float b_i) {
|
|
assert_or_panic(a_r == 1.25f);
|
|
assert_or_panic(a_i == 2.6f);
|
|
assert_or_panic(b_r == 11.3f);
|
|
assert_or_panic(b_i == -1.5f);
|
|
|
|
return 1.5f + I * 13.5f;
|
|
}
|
|
|
|
double complex c_cmultd_comp(double a_r, double a_i, double b_r, double b_i) {
|
|
assert_or_panic(a_r == 1.25);
|
|
assert_or_panic(a_i == 2.6);
|
|
assert_or_panic(b_r == 11.3);
|
|
assert_or_panic(b_i == -1.5);
|
|
|
|
return 1.5 + I * 13.5;
|
|
}
|
|
|
|
float complex c_cmultf(float complex a, float complex b) {
|
|
assert_or_panic(creal(a) == 1.25f);
|
|
assert_or_panic(cimag(a) == 2.6f);
|
|
assert_or_panic(creal(b) == 11.3f);
|
|
assert_or_panic(cimag(b) == -1.5f);
|
|
|
|
return 1.5f + I * 13.5f;
|
|
}
|
|
|
|
double complex c_cmultd(double complex a, double complex b) {
|
|
assert_or_panic(creal(a) == 1.25);
|
|
assert_or_panic(cimag(a) == 2.6);
|
|
assert_or_panic(creal(b) == 11.3);
|
|
assert_or_panic(cimag(b) == -1.5);
|
|
|
|
return 1.5 + I * 13.5;
|
|
}
|
|
|
|
void c_big_struct(struct BigStruct x) {
|
|
assert_or_panic(x.a == 1);
|
|
assert_or_panic(x.b == 2);
|
|
assert_or_panic(x.c == 3);
|
|
assert_or_panic(x.d == 4);
|
|
assert_or_panic(x.e == 5);
|
|
}
|
|
|
|
void c_big_union(union BigUnion x) {
|
|
assert_or_panic(x.a.a == 1);
|
|
assert_or_panic(x.a.b == 2);
|
|
assert_or_panic(x.a.c == 3);
|
|
assert_or_panic(x.a.d == 4);
|
|
}
|
|
|
|
void c_small_struct_ints(struct SmallStructInts x) {
|
|
assert_or_panic(x.a == 1);
|
|
assert_or_panic(x.b == 2);
|
|
assert_or_panic(x.c == 3);
|
|
assert_or_panic(x.d == 4);
|
|
|
|
struct SmallStructInts y = zig_ret_small_struct_ints();
|
|
|
|
assert_or_panic(y.a == 1);
|
|
assert_or_panic(y.b == 2);
|
|
assert_or_panic(y.c == 3);
|
|
assert_or_panic(y.d == 4);
|
|
}
|
|
|
|
struct SmallStructInts c_ret_small_struct_ints() {
|
|
struct SmallStructInts s = {
|
|
.a = 1,
|
|
.b = 2,
|
|
.c = 3,
|
|
.d = 4,
|
|
};
|
|
return s;
|
|
}
|
|
|
|
void c_med_struct_mixed(struct MedStructMixed x) {
|
|
assert_or_panic(x.a == 1234);
|
|
assert_or_panic(x.b == 100.0f);
|
|
assert_or_panic(x.c == 1337.0f);
|
|
|
|
struct MedStructMixed y = zig_ret_med_struct_mixed();
|
|
|
|
assert_or_panic(y.a == 1234);
|
|
assert_or_panic(y.b == 100.0f);
|
|
assert_or_panic(y.c == 1337.0f);
|
|
}
|
|
|
|
struct MedStructMixed c_ret_med_struct_mixed() {
|
|
struct MedStructMixed s = {
|
|
.a = 1234,
|
|
.b = 100.0,
|
|
.c = 1337.0,
|
|
};
|
|
return s;
|
|
}
|
|
|
|
void c_split_struct_ints(struct SplitStructInts x) {
|
|
assert_or_panic(x.a == 1234);
|
|
assert_or_panic(x.b == 100);
|
|
assert_or_panic(x.c == 1337);
|
|
}
|
|
|
|
void c_split_struct_mixed(struct SplitStructMixed x) {
|
|
assert_or_panic(x.a == 1234);
|
|
assert_or_panic(x.b == 100);
|
|
assert_or_panic(x.c == 1337.0f);
|
|
struct SplitStructMixed y = zig_ret_split_struct_mixed();
|
|
|
|
assert_or_panic(y.a == 1234);
|
|
assert_or_panic(y.b == 100);
|
|
assert_or_panic(y.c == 1337.0f);
|
|
}
|
|
|
|
uint8_t c_ret_small_packed_struct() {
|
|
uint8_t s = 0;
|
|
s |= 0 << 0;
|
|
s |= 1 << 2;
|
|
s |= 2 << 4;
|
|
s |= 3 << 6;
|
|
return s;
|
|
}
|
|
|
|
void c_small_packed_struct(uint8_t x) {
|
|
assert_or_panic(((x >> 0) & 0x3) == 0);
|
|
assert_or_panic(((x >> 2) & 0x3) == 1);
|
|
assert_or_panic(((x >> 4) & 0x3) == 2);
|
|
assert_or_panic(((x >> 6) & 0x3) == 3);
|
|
}
|
|
|
|
#ifndef ZIG_NO_I128
|
|
__int128 c_ret_big_packed_struct() {
|
|
__int128 s = 0;
|
|
s |= 1 << 0;
|
|
s |= (__int128)2 << 64;
|
|
return s;
|
|
}
|
|
|
|
void c_big_packed_struct(__int128 x) {
|
|
assert_or_panic(((x >> 0) & 0xFFFFFFFFFFFFFFFF) == 1);
|
|
assert_or_panic(((x >> 64) & 0xFFFFFFFFFFFFFFFF) == 2);
|
|
}
|
|
#endif
|
|
|
|
struct SplitStructMixed c_ret_split_struct_mixed() {
|
|
struct SplitStructMixed s = {
|
|
.a = 1234,
|
|
.b = 100,
|
|
.c = 1337.0f,
|
|
};
|
|
return s;
|
|
}
|
|
|
|
struct BigStruct c_big_struct_both(struct BigStruct x) {
|
|
assert_or_panic(x.a == 1);
|
|
assert_or_panic(x.b == 2);
|
|
assert_or_panic(x.c == 3);
|
|
assert_or_panic(x.d == 4);
|
|
assert_or_panic(x.e == 5);
|
|
struct BigStruct y = {10, 11, 12, 13, 14};
|
|
return y;
|
|
}
|
|
|
|
void c_small_struct_floats(Vector3 vec) {
|
|
assert_or_panic(vec.x == 3.0);
|
|
assert_or_panic(vec.y == 6.0);
|
|
assert_or_panic(vec.z == 12.0);
|
|
}
|
|
|
|
void c_small_struct_floats_extra(Vector3 vec, const char *str) {
|
|
assert_or_panic(vec.x == 3.0);
|
|
assert_or_panic(vec.y == 6.0);
|
|
assert_or_panic(vec.z == 12.0);
|
|
assert_or_panic(!strcmp(str, "hello"));
|
|
}
|
|
|
|
void c_big_struct_floats(Vector5 vec) {
|
|
assert_or_panic(vec.x == 76.0);
|
|
assert_or_panic(vec.y == -1.0);
|
|
assert_or_panic(vec.z == -12.0);
|
|
assert_or_panic(vec.w == 69);
|
|
assert_or_panic(vec.q == 55);
|
|
}
|
|
|
|
void c_multiple_struct_ints(Rect x, Rect y) {
|
|
assert_or_panic(x.left == 1);
|
|
assert_or_panic(x.right == 21);
|
|
assert_or_panic(x.top == 16);
|
|
assert_or_panic(x.bottom == 4);
|
|
assert_or_panic(y.left == 178);
|
|
assert_or_panic(y.right == 189);
|
|
assert_or_panic(y.top == 21);
|
|
assert_or_panic(y.bottom == 15);
|
|
}
|
|
|
|
void c_multiple_struct_floats(FloatRect x, FloatRect y) {
|
|
assert_or_panic(x.left == 1);
|
|
assert_or_panic(x.right == 21);
|
|
assert_or_panic(x.top == 16);
|
|
assert_or_panic(x.bottom == 4);
|
|
assert_or_panic(y.left == 178);
|
|
assert_or_panic(y.right == 189);
|
|
assert_or_panic(y.top == 21);
|
|
assert_or_panic(y.bottom == 15);
|
|
}
|
|
|
|
bool c_ret_bool() {
|
|
return 1;
|
|
}
|
|
uint8_t c_ret_u8() {
|
|
return 0xff;
|
|
}
|
|
uint16_t c_ret_u16() {
|
|
return 0xffff;
|
|
}
|
|
uint32_t c_ret_u32() {
|
|
return 0xffffffff;
|
|
}
|
|
uint64_t c_ret_u64() {
|
|
return 0xffffffffffffffff;
|
|
}
|
|
int8_t c_ret_i8() {
|
|
return -1;
|
|
}
|
|
int16_t c_ret_i16() {
|
|
return -1;
|
|
}
|
|
int32_t c_ret_i32() {
|
|
return -1;
|
|
}
|
|
int64_t c_ret_i64() {
|
|
return -1;
|
|
}
|
|
|
|
typedef struct {
|
|
uint32_t a;
|
|
uint8_t padding[4];
|
|
uint64_t b;
|
|
} StructWithArray;
|
|
|
|
void c_struct_with_array(StructWithArray x) {
|
|
assert_or_panic(x.a == 1);
|
|
assert_or_panic(x.b == 2);
|
|
}
|
|
|
|
StructWithArray c_ret_struct_with_array() {
|
|
return (StructWithArray){4, {}, 155};
|
|
}
|
|
|
|
typedef struct {
|
|
struct Point {
|
|
double x;
|
|
double y;
|
|
} origin;
|
|
struct Size {
|
|
double width;
|
|
double height;
|
|
} size;
|
|
} FloatArrayStruct;
|
|
|
|
void c_float_array_struct(FloatArrayStruct x) {
|
|
assert_or_panic(x.origin.x == 5);
|
|
assert_or_panic(x.origin.y == 6);
|
|
assert_or_panic(x.size.width == 7);
|
|
assert_or_panic(x.size.height == 8);
|
|
}
|
|
|
|
FloatArrayStruct c_ret_float_array_struct() {
|
|
FloatArrayStruct x;
|
|
x.origin.x = 1;
|
|
x.origin.y = 2;
|
|
x.size.width = 3;
|
|
x.size.height = 4;
|
|
return x;
|
|
}
|
|
|
|
typedef uint32_t SmallVec __attribute__((vector_size(2 * sizeof(uint32_t))));
|
|
|
|
void c_small_vec(SmallVec vec) {
|
|
assert_or_panic(vec[0] == 1);
|
|
assert_or_panic(vec[1] == 2);
|
|
}
|
|
|
|
SmallVec c_ret_small_vec(void) {
|
|
return (SmallVec){3, 4};
|
|
}
|
|
|
|
typedef size_t MediumVec __attribute__((vector_size(4 * sizeof(size_t))));
|
|
|
|
void c_medium_vec(MediumVec vec) {
|
|
assert_or_panic(vec[0] == 1);
|
|
assert_or_panic(vec[1] == 2);
|
|
assert_or_panic(vec[2] == 3);
|
|
assert_or_panic(vec[3] == 4);
|
|
}
|
|
|
|
MediumVec c_ret_medium_vec(void) {
|
|
return (MediumVec){5, 6, 7, 8};
|
|
}
|
|
|
|
typedef size_t BigVec __attribute__((vector_size(8 * sizeof(size_t))));
|
|
|
|
void c_big_vec(BigVec vec) {
|
|
assert_or_panic(vec[0] == 1);
|
|
assert_or_panic(vec[1] == 2);
|
|
assert_or_panic(vec[2] == 3);
|
|
assert_or_panic(vec[3] == 4);
|
|
assert_or_panic(vec[4] == 5);
|
|
assert_or_panic(vec[5] == 6);
|
|
assert_or_panic(vec[6] == 7);
|
|
assert_or_panic(vec[7] == 8);
|
|
}
|
|
|
|
BigVec c_ret_big_vec(void) {
|
|
return (BigVec){9, 10, 11, 12, 13, 14, 15, 16};
|
|
}
|
|
|
|
typedef struct {
|
|
float x, y;
|
|
} Vector2;
|
|
|
|
void c_ptr_size_float_struct(Vector2 vec) {
|
|
assert_or_panic(vec.x == 1);
|
|
assert_or_panic(vec.y == 2);
|
|
}
|
|
Vector2 c_ret_ptr_size_float_struct(void) {
|
|
return (Vector2){3, 4};
|
|
}
|
|
|
|
/// Tests for Double + Char struct
|
|
struct DC { double v1; char v2; };
|
|
|
|
int c_assert_DC(struct DC lv){
|
|
if (lv.v1 != -0.25) return 1;
|
|
if (lv.v2 != 15) return 2;
|
|
return 0;
|
|
}
|
|
struct DC c_ret_DC(){
|
|
struct DC lv = { .v1 = -0.25, .v2 = 15 };
|
|
return lv;
|
|
}
|
|
int zig_assert_DC(struct DC);
|
|
int c_send_DC(){
|
|
return zig_assert_DC(c_ret_DC());
|
|
}
|
|
struct DC zig_ret_DC();
|
|
int c_assert_ret_DC(){
|
|
return c_assert_DC(zig_ret_DC());
|
|
}
|
|
|
|
/// Tests for Char + Float + Float struct
|
|
struct CFF { char v1; float v2; float v3; };
|
|
|
|
int c_assert_CFF(struct CFF lv){
|
|
if (lv.v1 != 39) return 1;
|
|
if (lv.v2 != 0.875) return 2;
|
|
if (lv.v3 != 1.0) return 3;
|
|
return 0;
|
|
}
|
|
struct CFF c_ret_CFF(){
|
|
struct CFF lv = { .v1 = 39, .v2 = 0.875, .v3 = 1.0 };
|
|
return lv;
|
|
}
|
|
int zig_assert_CFF(struct CFF);
|
|
int c_send_CFF(){
|
|
return zig_assert_CFF(c_ret_CFF());
|
|
}
|
|
struct CFF zig_ret_CFF();
|
|
int c_assert_ret_CFF(){
|
|
return c_assert_CFF(zig_ret_CFF());
|
|
}
|
|
|
|
struct PD { void* v1; double v2; };
|
|
|
|
int c_assert_PD(struct PD lv){
|
|
if (lv.v1 != 0) return 1;
|
|
if (lv.v2 != 0.5) return 2;
|
|
return 0;
|
|
}
|
|
struct PD c_ret_PD(){
|
|
struct PD lv = { .v1 = 0, .v2 = 0.5 };
|
|
return lv;
|
|
}
|
|
int zig_assert_PD(struct PD);
|
|
int c_send_PD(){
|
|
return zig_assert_PD(c_ret_PD());
|
|
}
|
|
struct PD zig_ret_PD();
|
|
int c_assert_ret_PD(){
|
|
return c_assert_PD(zig_ret_PD());
|
|
}
|
|
|
|
struct ByRef {
|
|
int val;
|
|
int arr[15];
|
|
};
|
|
struct ByRef c_modify_by_ref_param(struct ByRef in) {
|
|
in.val = 42;
|
|
return in;
|
|
}
|
|
|
|
struct ByVal {
|
|
struct {
|
|
unsigned long x;
|
|
unsigned long y;
|
|
unsigned long z;
|
|
} origin;
|
|
struct {
|
|
unsigned long width;
|
|
unsigned long height;
|
|
unsigned long depth;
|
|
} size;
|
|
};
|
|
|
|
void c_func_ptr_byval(void *a, void *b, struct ByVal in, unsigned long c, void *d, unsigned long e) {
|
|
assert_or_panic((intptr_t)a == 1);
|
|
assert_or_panic((intptr_t)b == 2);
|
|
|
|
assert_or_panic(in.origin.x == 9);
|
|
assert_or_panic(in.origin.y == 10);
|
|
assert_or_panic(in.origin.z == 11);
|
|
assert_or_panic(in.size.width == 12);
|
|
assert_or_panic(in.size.height == 13);
|
|
assert_or_panic(in.size.depth == 14);
|
|
|
|
assert_or_panic(c == 3);
|
|
assert_or_panic((intptr_t)d == 4);
|
|
assert_or_panic(e == 5);
|
|
}
|
|
|
|
#ifndef ZIG_NO_RAW_F16
|
|
__fp16 c_f16(__fp16 a) {
|
|
assert_or_panic(a == 12);
|
|
return 34;
|
|
}
|
|
#endif
|
|
|
|
typedef struct {
|
|
__fp16 a;
|
|
} f16_struct;
|
|
f16_struct c_f16_struct(f16_struct a) {
|
|
assert_or_panic(a.a == 12);
|
|
return (f16_struct){34};
|
|
}
|
|
|
|
#if defined __x86_64__ || defined __i386__
|
|
typedef long double f80;
|
|
f80 c_f80(f80 a) {
|
|
assert_or_panic((double)a == 12.34);
|
|
return 56.78;
|
|
}
|
|
typedef struct {
|
|
f80 a;
|
|
} f80_struct;
|
|
f80_struct c_f80_struct(f80_struct a) {
|
|
assert_or_panic((double)a.a == 12.34);
|
|
return (f80_struct){56.78};
|
|
}
|
|
typedef struct {
|
|
f80 a;
|
|
int b;
|
|
} f80_extra_struct;
|
|
f80_extra_struct c_f80_extra_struct(f80_extra_struct a) {
|
|
assert_or_panic((double)a.a == 12.34);
|
|
assert_or_panic(a.b == 42);
|
|
return (f80_extra_struct){56.78, 24};
|
|
}
|
|
#endif
|
|
|
|
#ifndef ZIG_NO_F128
|
|
__float128 c_f128(__float128 a) {
|
|
assert_or_panic((double)a == 12.34);
|
|
return 56.78;
|
|
}
|
|
typedef struct {
|
|
__float128 a;
|
|
} f128_struct;
|
|
f128_struct c_f128_struct(f128_struct a) {
|
|
assert_or_panic((double)a.a == 12.34);
|
|
return (f128_struct){56.78};
|
|
}
|
|
#endif
|
|
|
|
void __attribute__((stdcall)) stdcall_scalars(char a, short b, int c, float d, double e) {
|
|
assert_or_panic(a == 1);
|
|
assert_or_panic(b == 2);
|
|
assert_or_panic(c == 3);
|
|
assert_or_panic(d == 4.0);
|
|
assert_or_panic(e == 5.0);
|
|
}
|
|
|
|
typedef struct {
|
|
short x;
|
|
short y;
|
|
} Coord2;
|
|
|
|
Coord2 __attribute__((stdcall)) stdcall_coord2(Coord2 a, Coord2 b, Coord2 c) {
|
|
assert_or_panic(a.x == 0x1111);
|
|
assert_or_panic(a.y == 0x2222);
|
|
assert_or_panic(b.x == 0x3333);
|
|
assert_or_panic(b.y == 0x4444);
|
|
assert_or_panic(c.x == 0x5555);
|
|
assert_or_panic(c.y == 0x6666);
|
|
return (Coord2){123, 456};
|
|
}
|
|
|
|
void __attribute__((stdcall)) stdcall_big_union(union BigUnion x) {
|
|
assert_or_panic(x.a.a == 1);
|
|
assert_or_panic(x.a.b == 2);
|
|
assert_or_panic(x.a.c == 3);
|
|
assert_or_panic(x.a.d == 4);
|
|
}
|
|
|
|
#ifdef __x86_64__
|
|
struct ByRef __attribute__((ms_abi)) c_explict_win64(struct ByRef in) {
|
|
in.val = 42;
|
|
return in;
|
|
}
|
|
|
|
struct ByRef __attribute__((sysv_abi)) c_explict_sys_v(struct ByRef in) {
|
|
in.val = 42;
|
|
return in;
|
|
}
|
|
#endif
|