Mercurial > projects > ldc

annotate test/bug15.d @ 128:e5fe8521bbfa trunk

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r132] Added some tests. some will fail at the moment.
author lindquist
date Fri, 30 Nov 2007 17:12:08 +0100
parents 8b0e809563df
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
40
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
1 module bug15;
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
2
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
3 bool bool1(bool b) {
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
4 if (b) return true;
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
5 else return false;
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
6 }
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
7
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
8 bool bool2(bool b) {
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
9 if (b) {return true;}
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
10 else {return false;}
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
11 }
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
12
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
13 void main()
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
14 {
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
15 assert(bool1(true));
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
16 assert(!bool2(false));
8b0e809563df [svn r44] Lots of bug fixes.
lindquist
parents:
diff changeset
17 }