diff options
| author | Drahflow <drahflow@gmx.de> | 2013-10-15 11:04:12 +0200 |
|---|---|---|
| committer | Drahflow <drahflow@gmx.de> | 2013-10-15 11:04:12 +0200 |
| commit | 596a42abc73e5d3cb12538248ce1ebc90f42ec24 (patch) | |
| tree | 83dfec063dd078e78e7535d4f4ebc8ebf3725e1a /examples/working-shared/sdl.ey | |
| parent | 64419a3ffee442e831dc3d54a64fe382baf7c297 (diff) | |
Now drawing (blue)
Diffstat (limited to 'examples/working-shared/sdl.ey')
| -rw-r--r-- | examples/working-shared/sdl.ey | 15 |
1 files changed, 10 insertions, 5 deletions
diff --git a/examples/working-shared/sdl.ey b/examples/working-shared/sdl.ey index 23d2e79..52a22b5 100644 --- a/examples/working-shared/sdl.ey +++ b/examples/working-shared/sdl.ey @@ -3,13 +3,18 @@ ffi .sdl ":" via -:SDL_INIT_VIDEO :SDL_Init { - :SDL_GetError dump - "SDL_Init failed" die +:INIT_VIDEO :Init { + :GetError dump + "Init failed" die } rep -"Ohai!" 0 0 800 600 0 :SDL_CreateWindow +"Ohai!" 0 0 800 600 0 :CreateWindow ==w -"done" die +w :GetWindowSurface ==s +s 255 :Fill dump +w :UpdateWindowSurface + +1 sys .out .read dump +:Quit # vim: syn=elymas |