Mercurial > projects > ldc
annotate tests/mini/complex1.d @ 1031:e594385d7e53
Fixed potential assertion failure in taking address of function as a constant expression.
author | Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> |
---|---|
date | Tue, 03 Mar 2009 17:27:14 +0100 |
parents | fbb1a366cfbc |
children |
rev | line source |
---|---|
90 | 1 module complex1; |
2 | |
3 void main() | |
4 { | |
104
4d1e9eb001e0
[svn r108] Now basic suppport for complex types. =,+,-,*,/ are supported.
lindquist
parents:
90
diff
changeset
|
5 cfloat cf1 = 3f + 0i; |
4d1e9eb001e0
[svn r108] Now basic suppport for complex types. =,+,-,*,/ are supported.
lindquist
parents:
90
diff
changeset
|
6 cfloat cf2 = 4f + 1i; |
4d1e9eb001e0
[svn r108] Now basic suppport for complex types. =,+,-,*,/ are supported.
lindquist
parents:
90
diff
changeset
|
7 cfloat cf3 = func(); |
4d1e9eb001e0
[svn r108] Now basic suppport for complex types. =,+,-,*,/ are supported.
lindquist
parents:
90
diff
changeset
|
8 auto c1 = cf1 + cf2; |
4d1e9eb001e0
[svn r108] Now basic suppport for complex types. =,+,-,*,/ are supported.
lindquist
parents:
90
diff
changeset
|
9 auto c2 = cf2 - cf3; |
4d1e9eb001e0
[svn r108] Now basic suppport for complex types. =,+,-,*,/ are supported.
lindquist
parents:
90
diff
changeset
|
10 auto c3 = cf1 * cf3; |
4d1e9eb001e0
[svn r108] Now basic suppport for complex types. =,+,-,*,/ are supported.
lindquist
parents:
90
diff
changeset
|
11 auto c4 = cf2 / cf3; |
90 | 12 } |
104
4d1e9eb001e0
[svn r108] Now basic suppport for complex types. =,+,-,*,/ are supported.
lindquist
parents:
90
diff
changeset
|
13 |
4d1e9eb001e0
[svn r108] Now basic suppport for complex types. =,+,-,*,/ are supported.
lindquist
parents:
90
diff
changeset
|
14 cfloat func() |
4d1e9eb001e0
[svn r108] Now basic suppport for complex types. =,+,-,*,/ are supported.
lindquist
parents:
90
diff
changeset
|
15 { |
4d1e9eb001e0
[svn r108] Now basic suppport for complex types. =,+,-,*,/ are supported.
lindquist
parents:
90
diff
changeset
|
16 return 3f + 1i; |
4d1e9eb001e0
[svn r108] Now basic suppport for complex types. =,+,-,*,/ are supported.
lindquist
parents:
90
diff
changeset
|
17 } |