Mercurial > projects > ldc
view tests/mini/naked_asm5.d @ 1595:628433c343b4
Fixed DStress tests nocompile/c/{const_32_B.d,const_32_C.d}.
Updated the runtest script to build libtangobos-partial.a if it hasn't already been built.
Added in signbit() and va_arg!()() to libtangobos-partial.a so more of the phobos dependent DStress tests pass.
author | Robert Clipsham <robert@octarineparrot.com> |
---|---|
date | Sun, 08 Nov 2009 16:16:17 +0000 |
parents | e92e14690a4f |
children |
line wrap: on
line source
int foo(int op)(int a, int b) { version(X86) { const OP = (op == '+') ? "add" : "sub"; version (Windows) { asm { naked; } mixin("asm{push EBP;mov EBP,ESP;sub ESP,8;mov ECX,[EBP+8];"~OP~" EAX, ECX;add ESP,8;pop EBP;}"); asm { ret; } } else { asm { naked; } mixin("asm{"~OP~" EAX, [ESP+4];}"); asm { ret 4; } } } else version(X86_64) { const OP = (op == '+') ? "add" : "sub"; asm { naked; } mixin("asm{"~OP~" ESI,EDI; mov EAX, ESI;}"); asm { ret; } } else static assert(0, "todo"); } void main() { int i = foo!('+')(2, 4); assert(i == 6); i = foo!('-')(2, 4); assert(i == 2); }