Mercurial > projects > ldc

annotate tests/mini/asm4.d @ 490:f8c979770af3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed a critical bug in the runtime, where _d_allocmemoryT would mark the memory block as having pointers (for scanning) opposite of what it should. So pointers would not be seen and freed. Should fix a bunch of regressions with AAs.
author Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
date Sun, 10 Aug 2008 17:28:01 +0200
parents 1bb99290e03a
children 4ac97ec7c18e
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
229
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
1 module tangotests.asm4;
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
2
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
3 extern(C) int printf(char*,...);
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
4
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
5 void main()
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
6 {
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
7 char* fmt = "yay!\n";
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
8 asm
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
9 {
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
10 jmp L2;
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
11 L1:;
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
12 jmp L3;
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
13 L2:;
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
14 jmp L1;
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
15 L3:;
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
16 push fmt;
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
17 call printf;
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
18 pop EAX;
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
19 }
cac3d27ae481 [svn r245] initial support for labels in inline asm, broken :/
lindquist
parents:
diff changeset
20 }