Hojun-Cho
60dec4a6bf
fold-2 chunk C4 (drew's Fam8-13 plan): 13 float value-row C drivers re-homed. 11 migrate to test/lang/*_test.ww @test row-tables (exact IEEE-bit asserts); 1 float-overflow reject row -> a runww //ww:error carrier. 956_tuprecv_f64 slims to a w6c_ww asserttyped pin (20 value rows -> @test; the stamp dimension can't be a value/byte-id @test) -- mutation-proven non-vacuous (break #121 stamp -> RED 6/6 -> restore -> GREEN) + an in-test vacuity self-check. 946_structparam/structret stay whole: their SSE register-class .s-grep (SysV ABI conformance, #165/#171a) is the genuine defect-guard, not @test-expressible. Float was the predicted SSE-cursor byte-id hotspot -- zero fresh cs!=ww surfaced; 951_f64cgen (cstage-only before) byte-ids clean. LANGBYTEID floor 82->93; test count 384->374 (10 deleted drivers; 956 + the 2 946 kept).
57 lines
1.7 KiB
Plaintext
57 lines
1.7 KiB
Plaintext
// arr_float_call_index_test — float arr[i]= with X0-clobbering index, migrated
|
|
// from test/wcc/916_arr_float_call_index_run.c (#5-C4, #125). In the `arr[i] = v`
|
|
// ASSIGN path, when the element type is float and the INDEX sub-expression
|
|
// clobbers X0 (e.g. a fn-call index), the value was LOST pre-fix: both stages
|
|
// PUSHed AX (junk for floats), never spilled X0 across the idx/base eval, then
|
|
// re-emitted MOVSS/MOVSD X0,(BX) using the already-clobbered X0. The fix spills
|
|
// X0 around the idx/base eval for float elements (SUBQ/MOVSD ...(SP)). Broken
|
|
// byte-identically between stages (pre-existing, exposed by #122) — T1 run + T2
|
|
// byte-id. The non-call-index rows are regression guards (lit/localvar/arith
|
|
// indices don't clobber X0; worked pre-fix).
|
|
|
|
package arr_float_call_index_test;
|
|
|
|
fn geti(x: f64) i32 = {
|
|
let y: f64 = x + 1.0;
|
|
return (y: i32);
|
|
};
|
|
|
|
// int-arg call: avoids a pre-call f32-arg-push MOVSD-vs-MOVSS sibling divergence;
|
|
// the body's f64 arith still clobbers X0.
|
|
fn getj(seed: i32) i32 = {
|
|
let y: f64 = (seed: f64) + 1.0;
|
|
return (y: i32);
|
|
};
|
|
|
|
@test fn f64_call_index() void = {
|
|
let a: [4]f64 = [99.0, 99.0, 99.0, 99.0];
|
|
a[geti(1.0)] = 1.5f64;
|
|
assert((a[2]: i32) == 1);
|
|
};
|
|
|
|
@test fn f32_call_index() void = {
|
|
let a: [4]f32 = [99.0f32, 99.0f32, 99.0f32, 99.0f32];
|
|
a[getj(1)] = 1.5f32;
|
|
assert((a[2]: i32) == 1);
|
|
};
|
|
|
|
@test fn f64_lit_index() void = {
|
|
let a: [4]f64 = [99.0, 99.0, 99.0, 99.0];
|
|
a[2] = 1.5f64;
|
|
assert((a[2]: i32) == 1);
|
|
};
|
|
|
|
@test fn f64_localvar_index() void = {
|
|
let a: [4]f64 = [99.0, 99.0, 99.0, 99.0];
|
|
let k: i32 = 2;
|
|
a[k] = 1.5f64;
|
|
assert((a[2]: i32) == 1);
|
|
};
|
|
|
|
@test fn f64_arith_index() void = {
|
|
let a: [4]f64 = [99.0, 99.0, 99.0, 99.0];
|
|
let k: i32 = 1;
|
|
a[k + 1] = 1.5f64;
|
|
assert((a[2]: i32) == 1);
|
|
};
|