Mercurial > projects > ldc
view demos/qd1.d @ 281:f5f97ca47b33 trunk
[svn r302] Make HaltExps and assert(0) generate an assert message again instead of using llvm's trap intrinsic.
author | ChristianK |
---|---|
date | Fri, 20 Jun 2008 23:38:51 +0200 |
parents | f869c636a113 |
children | 22a56b65872b |
line wrap: on
line source
module qd1; import qd; import std.c.time: sleep; void main() { screen(640, 480); pset(10, 10); line(0, 0, 100, 100, Box, Back(Red~Black)); for (int i=0; i<=100; i+=10) { line(i, 0, 100-i, 100); line(0, i, 100, 100-i); } circle(100, 100, 50, 15, White~Black, Fill=White~Black); paint(200, 200, Red, Back=White); circle(100, 100, 50, 15, White); paint(200, 200, Black); pset(10, 11); pset(10, 11, Black); pset(10, 10); sleep(5); }