| ... | @@ -104,10 +104,6 @@ export fn zig_struct_u128(a: U128) void { | ... | @@ -104,10 +104,6 @@ export fn zig_struct_u128(a: U128) void { |
| 104 | expect(a.value == 0xfffffffffffffffc) catch @panic("test failure: zig_struct_u128"); | 104 | expect(a.value == 0xfffffffffffffffc) catch @panic("test failure: zig_struct_u128"); |
| 105 | } | 105 | } |
| 106 | | 106 | |
| 107 | extern fn c_f32(f32) void; | | |
| 108 | extern fn c_f64(f64) void; | | |
| 109 | extern fn c_long_double(c_longdouble) void; | | |
| 110 | | | |
| 111 | // On windows x64, the first 4 are passed via registers, others on the stack. | 107 | // On windows x64, the first 4 are passed via registers, others on the stack. |
| 112 | extern fn c_five_floats(f32, f32, f32, f32, f32) void; | 108 | extern fn c_five_floats(f32, f32, f32, f32, f32) void; |
| 113 | | 109 | |
| ... | @@ -120,28 +116,9 @@ export fn zig_five_floats(a: f32, b: f32, c: f32, d: f32, e: f32) void { | ... | @@ -120,28 +116,9 @@ export fn zig_five_floats(a: f32, b: f32, c: f32, d: f32, e: f32) void { |
| 120 | } | 116 | } |
| 121 | | 117 | |
| 122 | test "floats" { | 118 | test "floats" { |
| 123 | c_f32(12.34); | | |
| 124 | c_f64(56.78); | | |
| 125 | c_five_floats(1.0, 2.0, 3.0, 4.0, 5.0); | 119 | c_five_floats(1.0, 2.0, 3.0, 4.0, 5.0); |
| 126 | } | 120 | } |
| 127 | | 121 | |
| 128 | test "long double" { | | |
| 129 | if (builtin.cpu.arch.isPowerPC()) return error.SkipZigTest; | | |
| 130 | | | |
| 131 | c_long_double(12.34); | | |
| 132 | } | | |
| 133 | | | |
| 134 | export fn zig_f32(x: f32) void { | | |
| 135 | expect(x == 12.34) catch @panic("test failure: zig_f32"); | | |
| 136 | } | | |
| 137 | export fn zig_f64(x: f64) void { | | |
| 138 | expect(x == 56.78) catch @panic("test failure: zig_f64"); | | |
| 139 | } | | |
| 140 | export fn zig_longdouble(x: c_longdouble) void { | | |
| 141 | if (!builtin.target.cpu.arch.isWasm()) return; // waiting for #1481 | | |
| 142 | expect(x == 12.34) catch @panic("test failure: zig_longdouble"); | | |
| 143 | } | | |
| 144 | | | |
| 145 | extern fn c_ptr(*anyopaque) void; | 122 | extern fn c_ptr(*anyopaque) void; |
| 146 | | 123 | |
| 147 | test "pointer" { | 124 | test "pointer" { |
| ... | @@ -269,6 +246,209 @@ export fn zig_cmultd_comp(a_r: f64, a_i: f64, b_r: f64, b_i: f64) ComplexDouble | ... | @@ -269,6 +246,209 @@ export fn zig_cmultd_comp(a_r: f64, a_i: f64, b_r: f64, b_i: f64) ComplexDouble |
| 269 | return .{ .real = 1.5, .imag = 13.5 }; | 246 | return .{ .real = 1.5, .imag = 13.5 }; |
| 270 | } | 247 | } |
| 271 | | 248 | |
| | 249 | export fn zig_ret_f32() f32 { |
| | 250 | return 1; |
| | 251 | } |
| | 252 | export fn zig_f32(f: f32, i: usize) void { |
| | 253 | expect(f == 2) catch @panic("test failure"); |
| | 254 | expect(i == 1) catch @panic("test failure"); |
| | 255 | } |
| | 256 | export fn zig_1_f32(_: usize, f: f32, i: usize) void { |
| | 257 | expect(f == 3) catch @panic("test failure"); |
| | 258 | expect(i == 2) catch @panic("test failure"); |
| | 259 | } |
| | 260 | export fn zig_2_f32(_: usize, _: usize, f: f32, i: usize) void { |
| | 261 | expect(f == 4) catch @panic("test failure"); |
| | 262 | expect(i == 3) catch @panic("test failure"); |
| | 263 | } |
| | 264 | export fn zig_3_f32(_: usize, _: usize, _: usize, f: f32, i: usize) void { |
| | 265 | expect(f == 5) catch @panic("test failure"); |
| | 266 | expect(i == 4) catch @panic("test failure"); |
| | 267 | } |
| | 268 | export fn zig_4_f32(_: usize, _: usize, _: usize, _: usize, f: f32, i: usize) void { |
| | 269 | expect(f == 6) catch @panic("test failure"); |
| | 270 | expect(i == 5) catch @panic("test failure"); |
| | 271 | } |
| | 272 | export fn zig_5_f32(_: usize, _: usize, _: usize, _: usize, _: usize, f: f32, i: usize) void { |
| | 273 | expect(f == 7) catch @panic("test failure"); |
| | 274 | expect(i == 6) catch @panic("test failure"); |
| | 275 | } |
| | 276 | export fn zig_6_f32(_: usize, _: usize, _: usize, _: usize, _: usize, _: usize, f: f32, i: usize) void { |
| | 277 | expect(f == 8) catch @panic("test failure"); |
| | 278 | expect(i == 7) catch @panic("test failure"); |
| | 279 | } |
| | 280 | export fn zig_7_f32(_: usize, _: usize, _: usize, _: usize, _: usize, _: usize, _: usize, f: f32, i: usize) void { |
| | 281 | expect(f == 9) catch @panic("test failure"); |
| | 282 | expect(i == 8) catch @panic("test failure"); |
| | 283 | } |
| | 284 | export fn zig_8_f32(_: usize, _: usize, _: usize, _: usize, _: usize, _: usize, _: usize, _: usize, f: f32, i: usize) void { |
| | 285 | expect(f == 10) catch @panic("test failure"); |
| | 286 | expect(i == 9) catch @panic("test failure"); |
| | 287 | } |
| | 288 | |
| | 289 | extern fn c_ret_f32() f32; |
| | 290 | extern fn c_f32(f32, usize) void; |
| | 291 | extern fn c_1_f32(usize, f32, usize) void; |
| | 292 | extern fn c_2_f32(usize, usize, f32, usize) void; |
| | 293 | extern fn c_3_f32(usize, usize, usize, f32, usize) void; |
| | 294 | extern fn c_4_f32(usize, usize, usize, usize, f32, usize) void; |
| | 295 | extern fn c_5_f32(usize, usize, usize, usize, usize, f32, usize) void; |
| | 296 | extern fn c_6_f32(usize, usize, usize, usize, usize, usize, f32, usize) void; |
| | 297 | extern fn c_7_f32(usize, usize, usize, usize, usize, usize, usize, f32, usize) void; |
| | 298 | extern fn c_8_f32(usize, usize, usize, usize, usize, usize, usize, usize, f32, usize) void; |
| | 299 | extern fn c_test_f32() void; |
| | 300 | |
| | 301 | test "f32" { |
| | 302 | const f = c_ret_f32(); |
| | 303 | try expect(f == 11); |
| | 304 | c_f32(12, 1); |
| | 305 | c_1_f32(0, 13, 2); |
| | 306 | c_2_f32(0, 1, 14, 3); |
| | 307 | c_3_f32(0, 1, 2, 15, 4); |
| | 308 | c_4_f32(0, 1, 2, 3, 16, 5); |
| | 309 | c_5_f32(0, 1, 2, 3, 4, 17, 6); |
| | 310 | c_6_f32(0, 1, 2, 3, 4, 5, 18, 7); |
| | 311 | c_7_f32(0, 1, 2, 3, 4, 5, 6, 19, 8); |
| | 312 | c_8_f32(0, 1, 2, 3, 4, 5, 6, 7, 20, 9); |
| | 313 | c_test_f32(); |
| | 314 | } |
| | 315 | |
| | 316 | export fn zig_ret_f64() f64 { |
| | 317 | return 1; |
| | 318 | } |
| | 319 | export fn zig_f64(f: f64, i: usize) void { |
| | 320 | expect(f == 2) catch @panic("test failure"); |
| | 321 | expect(i == 1) catch @panic("test failure"); |
| | 322 | } |
| | 323 | export fn zig_1_f64(_: usize, f: f64, i: usize) void { |
| | 324 | expect(f == 3) catch @panic("test failure"); |
| | 325 | expect(i == 2) catch @panic("test failure"); |
| | 326 | } |
| | 327 | export fn zig_2_f64(_: usize, _: usize, f: f64, i: usize) void { |
| | 328 | expect(f == 4) catch @panic("test failure"); |
| | 329 | expect(i == 3) catch @panic("test failure"); |
| | 330 | } |
| | 331 | export fn zig_3_f64(_: usize, _: usize, _: usize, f: f64, i: usize) void { |
| | 332 | expect(f == 5) catch @panic("test failure"); |
| | 333 | expect(i == 4) catch @panic("test failure"); |
| | 334 | } |
| | 335 | export fn zig_4_f64(_: usize, _: usize, _: usize, _: usize, f: f64, i: usize) void { |
| | 336 | expect(f == 6) catch @panic("test failure"); |
| | 337 | expect(i == 5) catch @panic("test failure"); |
| | 338 | } |
| | 339 | export fn zig_5_f64(_: usize, _: usize, _: usize, _: usize, _: usize, f: f64, i: usize) void { |
| | 340 | expect(f == 7) catch @panic("test failure"); |
| | 341 | expect(i == 6) catch @panic("test failure"); |
| | 342 | } |
| | 343 | export fn zig_6_f64(_: usize, _: usize, _: usize, _: usize, _: usize, _: usize, f: f64, i: usize) void { |
| | 344 | expect(f == 8) catch @panic("test failure"); |
| | 345 | expect(i == 7) catch @panic("test failure"); |
| | 346 | } |
| | 347 | export fn zig_7_f64(_: usize, _: usize, _: usize, _: usize, _: usize, _: usize, _: usize, f: f64, i: usize) void { |
| | 348 | expect(f == 9) catch @panic("test failure"); |
| | 349 | expect(i == 8) catch @panic("test failure"); |
| | 350 | } |
| | 351 | export fn zig_8_f64(_: usize, _: usize, _: usize, _: usize, _: usize, _: usize, _: usize, _: usize, f: f64, i: usize) void { |
| | 352 | expect(f == 10) catch @panic("test failure"); |
| | 353 | expect(i == 9) catch @panic("test failure"); |
| | 354 | } |
| | 355 | |
| | 356 | extern fn c_ret_f64() f64; |
| | 357 | extern fn c_f64(f64, usize) void; |
| | 358 | extern fn c_1_f64(usize, f64, usize) void; |
| | 359 | extern fn c_2_f64(usize, usize, f64, usize) void; |
| | 360 | extern fn c_3_f64(usize, usize, usize, f64, usize) void; |
| | 361 | extern fn c_4_f64(usize, usize, usize, usize, f64, usize) void; |
| | 362 | extern fn c_5_f64(usize, usize, usize, usize, usize, f64, usize) void; |
| | 363 | extern fn c_6_f64(usize, usize, usize, usize, usize, usize, f64, usize) void; |
| | 364 | extern fn c_7_f64(usize, usize, usize, usize, usize, usize, usize, f64, usize) void; |
| | 365 | extern fn c_8_f64(usize, usize, usize, usize, usize, usize, usize, usize, f64, usize) void; |
| | 366 | extern fn c_test_f64() void; |
| | 367 | |
| | 368 | test "f64" { |
| | 369 | const f = c_ret_f64(); |
| | 370 | try expect(f == 11); |
| | 371 | c_f64(12, 1); |
| | 372 | c_1_f64(0, 13, 2); |
| | 373 | c_2_f64(0, 1, 14, 3); |
| | 374 | c_3_f64(0, 1, 2, 15, 4); |
| | 375 | c_4_f64(0, 1, 2, 3, 16, 5); |
| | 376 | c_5_f64(0, 1, 2, 3, 4, 17, 6); |
| | 377 | c_6_f64(0, 1, 2, 3, 4, 5, 18, 7); |
| | 378 | c_7_f64(0, 1, 2, 3, 4, 5, 6, 19, 8); |
| | 379 | c_8_f64(0, 1, 2, 3, 4, 5, 6, 7, 20, 9); |
| | 380 | c_test_f64(); |
| | 381 | } |
| | 382 | |
| | 383 | export fn zig_ret_longdouble() c_longdouble { |
| | 384 | return 1; |
| | 385 | } |
| | 386 | export fn zig_longdouble(f: c_longdouble, i: usize) void { |
| | 387 | expect(f == 2) catch @panic("test failure"); |
| | 388 | expect(i == 1) catch @panic("test failure"); |
| | 389 | } |
| | 390 | export fn zig_1_longdouble(_: usize, f: c_longdouble, i: usize) void { |
| | 391 | expect(f == 3) catch @panic("test failure"); |
| | 392 | expect(i == 2) catch @panic("test failure"); |
| | 393 | } |
| | 394 | export fn zig_2_longdouble(_: usize, _: usize, f: c_longdouble, i: usize) void { |
| | 395 | expect(f == 4) catch @panic("test failure"); |
| | 396 | expect(i == 3) catch @panic("test failure"); |
| | 397 | } |
| | 398 | export fn zig_3_longdouble(_: usize, _: usize, _: usize, f: c_longdouble, i: usize) void { |
| | 399 | expect(f == 5) catch @panic("test failure"); |
| | 400 | expect(i == 4) catch @panic("test failure"); |
| | 401 | } |
| | 402 | export fn zig_4_longdouble(_: usize, _: usize, _: usize, _: usize, f: c_longdouble, i: usize) void { |
| | 403 | expect(f == 6) catch @panic("test failure"); |
| | 404 | expect(i == 5) catch @panic("test failure"); |
| | 405 | } |
| | 406 | export fn zig_5_longdouble(_: usize, _: usize, _: usize, _: usize, _: usize, f: c_longdouble, i: usize) void { |
| | 407 | expect(f == 7) catch @panic("test failure"); |
| | 408 | expect(i == 6) catch @panic("test failure"); |
| | 409 | } |
| | 410 | export fn zig_6_longdouble(_: usize, _: usize, _: usize, _: usize, _: usize, _: usize, f: c_longdouble, i: usize) void { |
| | 411 | expect(f == 8) catch @panic("test failure"); |
| | 412 | expect(i == 7) catch @panic("test failure"); |
| | 413 | } |
| | 414 | export fn zig_7_longdouble(_: usize, _: usize, _: usize, _: usize, _: usize, _: usize, _: usize, f: c_longdouble, i: usize) void { |
| | 415 | expect(f == 9) catch @panic("test failure"); |
| | 416 | expect(i == 8) catch @panic("test failure"); |
| | 417 | } |
| | 418 | export fn zig_8_longdouble(_: usize, _: usize, _: usize, _: usize, _: usize, _: usize, _: usize, _: usize, f: c_longdouble, i: usize) void { |
| | 419 | expect(f == 10) catch @panic("test failure"); |
| | 420 | expect(i == 9) catch @panic("test failure"); |
| | 421 | } |
| | 422 | |
| | 423 | extern fn c_ret_longdouble() c_longdouble; |
| | 424 | extern fn @"c_longdouble"(c_longdouble, usize) void; |
| | 425 | extern fn c_1_longdouble(usize, c_longdouble, usize) void; |
| | 426 | extern fn c_2_longdouble(usize, usize, c_longdouble, usize) void; |
| | 427 | extern fn c_3_longdouble(usize, usize, usize, c_longdouble, usize) void; |
| | 428 | extern fn c_4_longdouble(usize, usize, usize, usize, c_longdouble, usize) void; |
| | 429 | extern fn c_5_longdouble(usize, usize, usize, usize, usize, c_longdouble, usize) void; |
| | 430 | extern fn c_6_longdouble(usize, usize, usize, usize, usize, usize, c_longdouble, usize) void; |
| | 431 | extern fn c_7_longdouble(usize, usize, usize, usize, usize, usize, usize, c_longdouble, usize) void; |
| | 432 | extern fn c_8_longdouble(usize, usize, usize, usize, usize, usize, usize, usize, c_longdouble, usize) void; |
| | 433 | extern fn c_test_longdouble() void; |
| | 434 | |
| | 435 | test "long double" { |
| | 436 | if (builtin.cpu.arch.isMIPS64()) return error.SkipZigTest; |
| | 437 | |
| | 438 | const f = c_ret_longdouble(); |
| | 439 | try expect(f == 11); |
| | 440 | @"c_longdouble"(12, 1); |
| | 441 | c_1_longdouble(0, 13, 2); |
| | 442 | c_2_longdouble(0, 1, 14, 3); |
| | 443 | c_3_longdouble(0, 1, 2, 15, 4); |
| | 444 | c_4_longdouble(0, 1, 2, 3, 16, 5); |
| | 445 | c_5_longdouble(0, 1, 2, 3, 4, 17, 6); |
| | 446 | c_6_longdouble(0, 1, 2, 3, 4, 5, 18, 7); |
| | 447 | c_7_longdouble(0, 1, 2, 3, 4, 5, 6, 19, 8); |
| | 448 | c_8_longdouble(0, 1, 2, 3, 4, 5, 6, 7, 20, 9); |
| | 449 | c_test_longdouble(); |
| | 450 | } |
| | 451 | |
| 272 | comptime { | 452 | comptime { |
| 273 | skip: { | 453 | skip: { |
| 274 | if (builtin.zig_backend == .stage2_llvm and builtin.cpu.arch == .x86_64) break :skip; | 454 | if (builtin.zig_backend == .stage2_llvm and builtin.cpu.arch == .x86_64) break :skip; |