mirror of
https://github.com/dlang/dmd.git
synced 2025-04-26 13:10:12 +03:00
30 lines
550 B
D
30 lines
550 B
D
// REQUIRED_ARGS: -fPIC -O -release -inline -m64 -betterC
|
|
// DISABLED: win32 win64
|
|
|
|
// https://issues.dlang.org/show_bug.cgi?id=18936
|
|
// produces assert failure cgxmm.c line 684
|
|
|
|
import core.stdc.math;
|
|
|
|
struct S
|
|
{
|
|
double re, im;
|
|
|
|
|
|
static S sqrtcx(S* z)
|
|
{
|
|
S c;
|
|
real x,y,w,r;
|
|
|
|
{
|
|
x = fabs(z.re);
|
|
y = fabs(z.im);
|
|
if (z.re >= 0)
|
|
{
|
|
c.im = (z.im >= 0) ? w : -w;
|
|
c.re = z.im / (c.im + c.im);
|
|
}
|
|
}
|
|
return c;
|
|
}
|
|
}
|