view tests/mini/bug55.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

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

int atoi(char[] s) {
    int i, fac=1;
    bool neg = (s.length) && (s[0] == '-');
    char[] a = neg ? s[1..$] : s;
    foreach_reverse(c; a) {
        i += (c-'0') * fac;
        fac *= 10;
    }
    return !neg ? i : -i;
}

void main()
{
    printf("64213 = %d\n", atoi("64213"));
    printf("-64213 = %d\n", atoi("-64213"));
    assert(atoi("64213") == 64213);
    assert(atoi("-64213") == -64213);
}