Mercurial > projects > ldc

annotate tests/mini/asm4.d @ 585:fbb1a366cfbc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Complex number should now follow the D ABI on x86. They're also treated as first class values now. Big change.
author Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
date Tue, 09 Sep 2008 16:49:47 -0700
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 }