Mercurial > projects > ldc

annotate tests/mini/bug27.d @ 1596:42fc0d955a0d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Updated runtest to always rebuild libtangobos-partial.a in case of updates. Changed std.stdarg to import ldc.vararg so it has the correct implementation.
author Robert Clipsham <robert@octarineparrot.com>
date Sun, 15 Nov 2009 13:22:02 +0000
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 }