Mercurial > projects > ldc
view tests/mini/callingconv1.d @ 1596:42fc0d955a0d
Updated runtest to always rebuild libtangobos-partial.a in case of updates.
Changed std.stdarg to import ldc.vararg so it has the correct implementation.
author | Robert Clipsham <robert@octarineparrot.com> |
---|---|
date | Sun, 15 Nov 2009 13:22:02 +0000 |
parents | e92e14690a4f |
children |
line wrap: on
line source
module mini.callingconv1; extern(C) int printf(char*, ...); float foo(float a, float b) { return a + b; } void main() { float a = 1.5; float b = 2.5; float c; version(D_InlineAsm_X86) { version(Windows) { asm { movss XMM0, [a]; movss XMM1, [b]; movss [ESP], XMM1; movss [ESP]+4, XMM0; call foo; fstp [c]-4; movss XMM0, [c]-4; movss [c], XMM0; } } else { asm { mov EAX, [a]; push EAX; mov EAX, [b]; push EAX; call foo; fstp c; } } } else version(D_InlineAsm_X86_64) { asm { movss XMM0, [a]; movss XMM1, [b]; call foo; movss [c], XMM0; } } printf("%f\n", c); assert(c == 4.0); printf("passed %f\n", c); }