view tangotests/vararg2.d @ 212:4c2689d57ba4 trunk

[svn r228] Fixed: when new'ing basic types, the storage was not default initialized. Fixed: the tango/lib/compiler/llvmdc/llvmdc.mak makefile was a bit incorrect. Changed: the basic gc is now the default. Changed: renamed a few temporary names in the LLVM IR output.
author lindquist
date Tue, 27 May 2008 22:14:24 +0200
parents a8cd9bc1021a
children
line wrap: on
line source

module tangotests.vararg2;

extern(C) int printf(char*, ...);

import tango.core.Vararg;

void main()
{
    func(0xf00, 1, " ", 2, " ", 3, "\n", 0.3, "\n");
}

void func(int foo, ...)
{
    foreach(t; _arguments)
    {
        if (t == typeid(char[]))
        {
            char[] str = va_arg!(char[])(_argptr);
            printf("%.*s", str.length, str.ptr);
        }
        else if (t == typeid(int))
        {
            printf("%d", va_arg!(int)(_argptr));
        }
        else if (t == typeid(float))
        {
            printf("%f", va_arg!(float)(_argptr));
        }
        else if (t == typeid(double))
        {
            printf("%f", va_arg!(double)(_argptr));
        }
        else if (t == typeid(real))
        {
            printf("%f", va_arg!(real)(_argptr));
        }
        else
        {
            assert(0, "not int");
        }
    }
}