Mercurial > projects > ldc
annotate tangotests/debug2.d @ 270:d9d5d59873d8 trunk
[svn r291] Fixed a bunch of the old Phobos tests to work with Tango.
Branch statements now emit a new block after it.
Fixed the _adSort runtime function had a bad signature.
Added a missing dot prefix on compiler generated string tables for string switch.
Fixed, PTRSIZE seems like it was wrong on 64bit, now it definitely gets set properly.
author | lindquist |
---|---|
date | Mon, 16 Jun 2008 16:01:19 +0200 |
parents | d61ce72c39ab |
children |
rev | line source |
---|---|
245
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
1 module tangotests.debug2; |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
2 |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
3 import tango.stdc.stdlib : rand; |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
4 |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
5 void main() |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
6 { |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
7 size_t iter; |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
8 while (iter < 25) |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
9 { |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
10 if (rand() % 20 == 10) |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
11 *cast(int*)null = 0; |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
12 ++iter; |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
13 } |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
14 assert(0); |
d61ce72c39ab
[svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff
changeset
|
15 } |