Mercurial > projects > ldc
annotate test/bug55.d @ 340:351c0077d0b3 trunk
[svn r361] Removed some dead code.
author | lindquist |
---|---|
date | Sun, 13 Jul 2008 02:04:25 +0200 |
parents | d9d5d59873d8 |
children |
rev | line source |
---|---|
92 | 1 module bug55; |
270
d9d5d59873d8
[svn r291] Fixed a bunch of the old Phobos tests to work with Tango.
lindquist
parents:
92
diff
changeset
|
2 extern(C) int printf(char*, ...); |
92 | 3 |
4 int atoi(char[] s) { | |
5 int i, fac=1; | |
6 bool neg = (s.length) && (s[0] == '-'); | |
7 char[] a = neg ? s[1..$] : s; | |
8 foreach_reverse(c; a) { | |
9 i += (c-'0') * fac; | |
10 fac *= 10; | |
11 } | |
12 return !neg ? i : -i; | |
13 } | |
14 | |
15 void main() | |
16 { | |
17 printf("64213 = %d\n", atoi("64213")); | |
18 printf("-64213 = %d\n", atoi("-64213")); | |
19 assert(atoi("64213") == 64213); | |
20 assert(atoi("-64213") == -64213); | |
21 } |