Mercurial > pub > dyncall > bindings

view lua/luadyncall/test/test_CocoaEssentials.lua @ 0:0cfcc391201f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
initial from svn dyncall-1745
author Daniel Adler
date Thu, 19 Mar 2015 22:26:28 +0100
parents
children
line wrap: on
line source

require"dynport"
dynport("CocoaEssentials")
NSApplicationLoad ()
dynport("SDL")
SDL_Init(SDL_INIT_VIDEO)
SDL_SetVideoMode(640,480,32,SDL_OPENGL)
dynport("GL")
quit = false
while not quit do
  glClearColor(0,0,1,1)
  glClear(GL.GL_COLOR_BUFFER_BIT)
  SDL_GL_SwapBuffers()
end