Mercurial > projects > ldc
annotate tangotests/asm4.d @ 314:8d98e42ece93 trunk
[svn r335] The basics of exception handling are in place.
Still need to make sure calls are turned into invokes everywhere. (NewExpression for instance)
Still some rough edges and corner cases to figure out.
Needs testing!
author | ChristianK |
---|---|
date | Wed, 02 Jul 2008 22:20:18 +0200 |
parents | 79d8f6b3fbaf |
children |
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 } |