#line 3612 "/home/travis/build/felix-lang/felix/src/packages/sdl.fdoc"
  
  
  
  
  open module SDL_events
  {
    requires package "sdl";
    open C_hack;
  
    fun event_type: SDL_Event -> uint8 = "$1.type";
  
    proc block_sdl_events(m:&SDL_mutex)
    {
      var dummy = SDL_UserEvent(cast[uint32] SDL_USEREVENT,0,NULL,NULL);
      ignore(SDL_PushEvent(cast [&SDL_Event] (&dummy)));
      ignore(SDL_LockMutex(m));
    }
  
    proc unblock_sdl_events(m:&SDL_mutex)
    {
      ignore(SDL_UnlockMutex(m));
    }
  }