Mercurial > projects > ldc

annotate tangotests/debug5.d @ 329:8c1dc3e705da trunk

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r350] Fixed incorrect function types for lazy arguments. looks like lazy arguments have never even worked :o well.. now they should.
author lindquist
date Fri, 11 Jul 2008 01:34:04 +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 }