Mercurial > projects > ldc

annotate tangotests/debug5.d @ 293:ebfa488f4abc trunk

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r314] Get correct value type for newing of multidimensional dynamic arrays. Fixes array_initialization_26_E.
author ChristianK
date Sun, 22 Jun 2008 15:21:34 +0200
parents d61ce72c39ab
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
245
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff changeset
1 module tangotests.debug5;
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 void main()
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 int i = 32;
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff changeset
6 real r = 3.1415;
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff changeset
7 real* p = &r;
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff changeset
8 func(i,r,p);
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
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff changeset
11 void func(int i, real r, real* p)
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff changeset
12 {
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff changeset
13 int* fail;
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff changeset
14 *fail = 666;
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters.
lindquist
parents:
diff changeset
15 }