view tests/mini/vararg4.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 1bb99290e03a
children
line wrap: on
line source

module vararg4;
import tango.core.Vararg;
extern(C) int printf(char*, ...);

void vafunc(...)
{
    foreach(i,v; _arguments) {
        if (typeid(byte) == v) {
            printf("byte(%d)\n", va_arg!(byte)(_argptr));
        }
        else if (typeid(short) == v) {
            printf("short(%d)\n", va_arg!(short)(_argptr));
        }
        else if (typeid(int) == v) {
            printf("int(%d)\n", va_arg!(int)(_argptr));
        }
        else if (typeid(long) == v) {
            printf("long(%ld)\n", va_arg!(long)(_argptr));
        }
        else if (typeid(float) == v) {
            printf("float(%f)\n", va_arg!(float)(_argptr));
        }
        else if (typeid(double) == v) {
            printf("double(%f)\n", va_arg!(double)(_argptr));
        }
        else if (typeid(real) == v) {
            printf("real(%f)\n", va_arg!(real)(_argptr));
        }
        else
        assert(0, "unsupported type");
    }
}

void main()
{
    vafunc(byte.max,short.max,1,2,3,4L,5.0f,6.0,cast(real)7);
}