OpenEuphoria

SFML Wrapper Error?

• Posted by Icy_Viking Jun 09, 2019
• 1420 views

Hello all,

While I went to test one of my SFML wrappers, I noticed I get this error. type check failure code is 1868852841

The line the error originates from is:

without warning 
without type_check 
 
include std/machine.e 
include EuSys2.ew 
include EuGfx2.ew 
 
include sfFlags.e 
 
atom win = sfRenderWindow_create(800,600,32,"My Window",sfClose,0) 
 
if win = -1 then 
	puts(1,"Could not create render window!\n") 
	abort(0) 
end if 
 
constant event = allocate(4 * 6) 
 
while sfRenderWindow_isOpen(win) do 
	 
	while sfRenderWindow_pollEvent(win,event) do 
	 
	  integer eventType = peek4s(event) 
	  integer code = peek4s(event+4) --originates from here 
	  integer alt = peek4s(event+8) 
	  integer control = peek4s(event+13) 
	  integer shift = peek4s(event+16) 
	  integer system = peek4s(event+20) 
	   
		if eventType = sfEvtClosed then 
			sfRenderWindow_close(win) 
		end if 
		 
	end while 
	 
	sfRenderWindow_clear(win,sfBlack) 
	 
	sfRenderWindow_display(win) 
 
end while 
 
sfRenderWindow_destroy(win) 

Any ideas? This worked fine before I updated Euphoria.