annotate lphobos/std/stdarg.d @ 650:aa6a0b7968f7

Added test case for bug #100 Removed dubious check for not emitting static private global in other modules without access. This should be handled properly somewhere else, it's causing unresolved global errors for stuff that should work (in MiniD)
author Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
date Sun, 05 Oct 2008 17:28:15 +0200
parents 5825d48b27d1
children eef8ac26c66c
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
65
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
1
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
2 /*
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
3 * Placed in public domain.
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
4 * Written by Hauke Duden and Walter Bright
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
5 */
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
6
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
7 /* This is for use with variable argument lists with extern(D) linkage. */
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
8
131
5825d48b27d1 [svn r135] * Merged DMD 1.025 *
lindquist
parents: 70
diff changeset
9 /* Modified for LLVMDC (LLVM D Compiler) by Tomas Lindquist Olsen, 2007 */
5825d48b27d1 [svn r135] * Merged DMD 1.025 *
lindquist
parents: 70
diff changeset
10
65
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
11 module std.stdarg;
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
12
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
13 alias void* va_list;
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
14
131
5825d48b27d1 [svn r135] * Merged DMD 1.025 *
lindquist
parents: 70
diff changeset
15 T va_arg(T)(ref va_list vp)
65
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
16 {
131
5825d48b27d1 [svn r135] * Merged DMD 1.025 *
lindquist
parents: 70
diff changeset
17 size_t size = T.sizeof > size_t.sizeof ? size_t.sizeof : T.sizeof;
5825d48b27d1 [svn r135] * Merged DMD 1.025 *
lindquist
parents: 70
diff changeset
18 va_list vptmp = cast(va_list)((cast(size_t)vp + size - 1) & ~(size - 1));
70
fb265a6efea1 [svn r74] Fixed passing types with different alignment to D-style variadic functions.
lindquist
parents: 65
diff changeset
19 vp = vptmp + T.sizeof;
65
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
20 return *cast(T*)vptmp;
d4a678905d5e [svn r69] forgot std.stdarg
lindquist
parents:
diff changeset
21 }