Mercurial > projects > ldc

annotate tests/mini/bug27.d @ 1651:cb960b882ca3 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
bindings were moved to dsource.org/projects/bindings/
author Moritz Warning <moritzwarning@web.de>
date Thu, 20 May 2010 20:05:03 +0200
parents 1bb99290e03a
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
52
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
1 module bug27;
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
2
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
3 int func(int a, int b)
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
4 {
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
5 if (a == b)
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
6 return 0;
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
7 else if (a < b)
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
8 return -1;
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
9 else
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
10 return 1;
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
11 }
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
12
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
13 void main()
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
14 {
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
15 int i = func(3,4);
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
16 assert(i == -1);
0c77619e803b [svn r56] Initial support for TypeInfo.
lindquist
parents:
diff changeset
17 }