annotate tangotests/debug5.d @ 245:d61ce72c39ab trunk

[svn r262] Fixed debug info for normal function parameters. Fixed debug info for pointers to basic types.
author lindquist
date Mon, 09 Jun 2008 12:43:16 +0200
parents
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 }