view tangotests/vararg2.d @ 275:665b81613475 trunk

[svn r296] Removed: the 'suite' dir, it never took off! Fixed: foreach statement, key-type checks were buggy. Fixed: setting LLVMDC versions on the command line is now an error. Fixed: array compare runtime had incorrect param attrs on call. Fixed: index expressions on dynamic array slices w/o storage was broken. Fixed: scope classes had incorrect finalization in some cases. Fixed: when outputting !ClassInfoS !OffsetTypeInfoS, static class members were trying to be included, crashing the compiler. Fixed: calling LLVMDC with -inline but not any -O option caused assertion failure. Changed: the runtime now uses a single interface to "get" to !TypeInfoS, part of eliminating duplicate !TypeInfo codegen.
author lindquist
date Thu, 19 Jun 2008 17:30:32 +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");
        }
    }
}