blob: 00eb64be3f92642d3010fca2cbf2c3f8fe2a795a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
diff --git a/src/SDL.xs b/src/SDL.xs
index a13882c8..5856e3af 100644
--- a/src/SDL.xs
+++ b/src/SDL.xs
@@ -144,7 +144,7 @@ sdl_perl_atexit (void)
SDL_Quit();
}
-void boot_SDL();
+XS(boot_SDL);
void boot_SDL__OpenGL();
XS(boot_SDL_perl)
@@ -155,7 +155,7 @@ XS(boot_SDL_perl)
#endif
PL_perl_destruct_level = 2;
GET_TLS_CONTEXT
- boot_SDL();
+ boot_SDL(aTHX_ cv);
#if defined WINDOWS || defined WIN32
SDL_RegisterApp ("SDLPerl App", 0, GetModuleHandle (NULL));
|