Mercurial > projects > ldc

view demos/sdldemo1.d @ 281:f5f97ca47b33 trunk

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[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 27b2f40bdb58
children
line wrap: on
line source

module sdldemo1;
import sdl;
void main()
{
    auto disp = SDL_SetVideoMode(640,480,0,SDL_HWSURFACE|SDL_DOUBLEBUF);
    auto r = SDL_Rect(0,190,100,100);
    auto c = SDL_MapRGBA(disp.format,255,100,0,255);
    while (r.x < disp.w-100) {
        SDL_FillRect(disp, null, 0);
        SDL_FillRect(disp, &r, c);
        SDL_Flip(disp);
        r.x++;
    }
}