1 files changed, 2 insertions, 0 deletions
diff --git a/src/GLX.hs b/src/GLX.hs
index 6f5b0fc..6f245a7 100644
--- a/src/GLX.hs
+++ b/src/GLX.hs
@@ -105,6 +105,8 @@ instance Driver GLX where
     swapBuffers glx = Bindings.GLX.swapBuffers (glxDisplay glx) (glxWindow glx)
     
     nextEvent glx = allocaXEvent $ nextEvent' glx
+    
+    usleep _ usecs = glxUsleep $ fromIntegral usecs
 
 
 nextEvent' :: GLX -> XEventPtr -> IO (GLX, Maybe SomeEvent)