Mercurial > projects > ldc
annotate tests/mini/bug55.d @ 969:fe2d9bb7078d
Add some extra debug output that's useful in diagnosing inline assembler bugs.
author | Frits van Bommel <fvbommel wxs.nl> |
---|---|
date | Mon, 16 Feb 2009 23:56:56 +0100 |
parents | 1bb99290e03a |
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 } |