Fixing SDL1 event handling

sdl.asm

@@ -6,8 +6,10 @@ Extern SDL_Delay
 Extern SDL_OpenAudio
 Extern SDL_PauseAudio
 Extern SDL_WaitEvent
+Extern SDL_GetError
 
 
+%define SDL_QuitEvent 0x0C
 
 %define SDL_SWSURFACE 0
 

yaglitch.asm

@@ -358,17 +358,39 @@ audio_start:
 	call SDL_PauseAudio
 
 loop_event:
+	xor rdi, rdi
+	mov [event], rdi
 	mov rdi, event
 	call SDL_WaitEvent
-
+	cmp rax, 0
+	je sdl_error ; error fetching event...
 	xor rdi, rdi
-	mov edi, [event]
-	cmp edi, 0
-	jl exit ; SIGINT
-	cmp edi, 0x00010001 ; SDL_QUIT PRESS ?
-	je exit
+	mov di, [event]
+
+dbg:
+	;mov rsi, 1
+	;push rdi
+	;call print_hnum
+	;pop rdi
+
+	test di, SDL_QuitEvent
+	jnz exit
+
 	jmp loop_event
 
+sdl_error:
+	; display error & exit
+	call SDL_GetError
+	push rax
+	call strlen
+	mov rdx, rsi ; msglen
+	pop rdi ; msg
+	mov rax, 1 ; write
+	mov rdi, 2 ; stderr
+	syscall
+	mov rdi, 0xF
+	jmp exit.exit_err
+
 exit:
 	call SDL_Quit