view tests/mini/funcs.d @ 1651:cb960b882ca3 default tip

bindings were moved to dsource.org/projects/bindings/
author Moritz Warning <moritzwarning@web.de>
date Thu, 20 May 2010 20:05:03 +0200
parents 1bb99290e03a
children
line wrap: on
line source

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

void main()
{
    printf("Testing functions\n");
    int i = 5;
    assert(a(i) == 110);
    assert(i == 11);

    S s;
    s.i = 5;
    d(s);
    assert(s.i == 5);
    e(s);
    assert(s.i == 6);

    printf("  SUCCESS\n");
}

int a(ref int i)
{
    i*=2;
    return b(i);
}

int b(ref int i)
{
    i++;
    return c(i);
}

int c(int i)
{
    return i*10;
}

struct S
{
    int i;
}

void d(S s)
{
    s.i++;
}

void e(ref S s)
{
    s.i++;
}