Mercurial > projects > dstress
changeset 1572:169ba9b6cb5d
[Issue 1013] Invalid code generated for naked functions with (u)long arguments
<madou@madou.org>
2007-03-01
http://d.puremagic.com/issues/show_bug.cgi?id=1013
author | thomask |
---|---|
date | Thu, 21 Feb 2008 15:18:50 +0000 |
parents | b6eb7f46f42c |
children | 81b51faeeefe |
files | run/a/asm_naked_01.d |
diffstat | 1 files changed, 40 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/run/a/asm_naked_01.d Thu Feb 21 15:18:50 2008 +0000 @@ -0,0 +1,40 @@ +// $HeadURL$ +// $Date$ +// $Author$ + +// @author@ <madou@madou.org> +// @date@ 2007-03-01 +// @uri@ http://d.puremagic.com/issues/show_bug.cgi?id=1013 +// @desc@ [Issue 1013] Invalid code generated for naked functions with (u)long arguments + +module dstress.run.a.asm_naked_01; + +version(D_InlineAsm_X86){ + version(GNU){ + const RET_SIZE = 0; + }else{ + const RET_SIZE = 8; + } + long test(long l){ + asm{ + naked; + mov EDX, [ESP+0x8]; + mov EAX, [ESP+0x4]; + add EAX, 0x1; + adc EDX, 0x1; + ret RET_SIZE; + } + } + + int main(){ + if(0x1234_567A_0000_0000 != test(0x1234_5678_FFFF_FFFF)){ + assert(0); + } + + return 0; + } +}else{ + pragma(msg, "DSTRESS{XFAIL}: no matching inline ASM support"); + static assert(0); +} +