Mercurial > projects > ldc

annotate tests/mini/asm10.d @ 1602:a413ae7329bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge DMD r243: some harmonization with D2 dmd --- dmd/aggregate.h | 24 ++++- dmd/attrib.c | 63 ++++++---- dmd/attrib.h | 10 +- dmd/declaration.h | 5 +- dmd/func.c | 337 ++++++++++++++++++++++------------------------------- dmd/mars.c | 2 +- dmd/mars.h | 7 + dmd/mtype.h | 13 ++- dmd/parse.c | 32 ++++- dmd/parse.h | 14 ++- dmd/scope.h | 2 +- 11 files changed, 263 insertions(+), 246 deletions(-)
author Leandro Lucarella <llucax@gmail.com>
date Wed, 06 Jan 2010 15:18:19 -0300
parents 97d80437cb80
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
1109
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
1 module asm10;
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
2
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
3 struct S {
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
4 ushort first;
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
5 ushort second;
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
6 int unaccessed;
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
7 }
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
8
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
9 void main() {
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
10 auto s = S(512, 42, -1);
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
11 ushort x = 0;
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
12 version(D_InlineAsm_X86) {
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
13 asm {
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
14 lea EAX, s;
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
15 mov CX, S.second[EAX];
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
16 mov x, CX;
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
17 mov S.first[EAX], 640;
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
18 }
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
19 } else version(D_InlineAsm_X86_64) {
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
20 asm {
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
21 lea RAX, s;
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
22 mov CX, S.second[RAX];
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
23 mov x, CX;
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
24 mov S.first[RAX], 640;
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
25 }
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
26 }
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
27 assert(x == 42);
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
28 assert(s.first == 640);
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
29 assert(s.second == 42);
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
30 assert(s.unaccessed == -1);
97d80437cb80 Fix field access from inline asm. See tests/mini/asm10.d
Frits van Bommel <fvbommel wxs.nl>
parents:
diff changeset
31 }