> the attached Ada testcase triggers an ICE with -mbig-endian -mhard-float:
And here it is. -- Eric Botcazou
package body P is procedure Split (R : Rec; A, B, C, D : out Long_Float) is begin A := R.A; B := R.B; C := R.C; D := R.D; end; end P;
package P is type Rec is record A, B, C, D: Long_Float; end record; procedure Split (R : Rec; A, B, C, D : out Long_Float); end P;