Mercurial > projects > ldc
annotate demos/qd1.d @ 1083:c1e9f612e2e2
Fix for dual operand form of fistp, also make reg ST(0) explicit and fix lindquists
previous code that allowed dual operand form of fstp but dissallowed the single
operand form accidently
author | Kelly Wilson <wilsonk cpsc.ucalgary.ca> |
---|---|
date | Tue, 10 Mar 2009 06:23:26 -0600 |
parents | 22a56b65872b |
children |
rev | line source |
---|---|
85
f869c636a113
[svn r89] Fixed a bunch of problems with template instance across multiple modules.
lindquist
parents:
diff
changeset
|
1 module qd1; |
f869c636a113
[svn r89] Fixed a bunch of problems with template instance across multiple modules.
lindquist
parents:
diff
changeset
|
2 import qd; |
f869c636a113
[svn r89] Fixed a bunch of problems with template instance across multiple modules.
lindquist
parents:
diff
changeset
|
3 void main() { |
f869c636a113
[svn r89] Fixed a bunch of problems with template instance across multiple modules.
lindquist
parents:
diff
changeset
|
4 screen(640, 480); |
450
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
5 sleep(1); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
6 |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
7 cls(Red); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
8 sleep(1); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
9 |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
10 cls(Green); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
11 sleep(1); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
12 |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
13 cls(Blue); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
14 sleep(1); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
15 |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
16 // pset(10, 10); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
17 // line(0, 0, 100, 100, Box, Back(Red~Black)); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
18 // for (int i=0; i<=100; i+=10) { |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
19 // line(i, 0, 100-i, 100); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
20 // line(0, i, 100, 100-i); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
21 // } |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
22 // circle(100, 100, 50, 15, White~Black, Fill=White~Black); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
23 // paint(200, 200, Red, Back=White); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
24 // circle(100, 100, 50, 15, White); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
25 // paint(200, 200, Black); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
26 // pset(10, 11); pset(10, 11, Black); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
27 // pset(10, 10); |
22a56b65872b
Trying to get the old QD demo to work.
Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
parents:
85
diff
changeset
|
28 // sleep(1); |
85
f869c636a113
[svn r89] Fixed a bunch of problems with template instance across multiple modules.
lindquist
parents:
diff
changeset
|
29 } |