view tests/mini/callingconv1.d @ 1605:1d5721f9ae18

[WIP] Merge DMD r251: bugzilla 111 (appending a dchar to a char[]) This patch needs some work in the code generation, because of the runtime changes (functions "_d_arrayappendcd" and "_d_arrayappendwd" are added). This doesn't affect existing code though, it just makes with patch a little useless, because something like this: char [] s; s ~= '\u6211'; That failed to compile with a nice error message previously to this change, now fails with and ugly error message (a failed assertion). Apparently there is a regression introduced by this patch too, when compiling Dil I get this assertion message: ldc: /home/luca/tesis/ldc/gen/statements.cpp:132: virtual void ReturnStatement::toIR(IRState*): Assertion `p->topfunc()->getReturnType() == llvm::Type::getVoidTy(gIR->context())' failed. 0 ldc 0x08a91628 Thank god we have bisecting capabilities in VCSs now ;) --- dmd/expression.c | 47 +++++++++++++++++++++++++++++++++++++++++------ 1 files changed, 41 insertions(+), 6 deletions(-)
author Leandro Lucarella <llucax@gmail.com>
date Wed, 06 Jan 2010 15:18:19 -0300
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);
}