Importing SDLPerl 2.2
[sdlgit/SDL_perl.git] / lib / SDL / Config.pm
1 package SDL::Config;
2
3 my $sdl_config; 
4 $sdl_config = {
5                 'OpenGL' => {
6                               'GL' => [
7                                         '/System/Library/Frameworks/OpenGL.framework/Headers',
8                                         '/System/Library/Frameworks/OpenGL.framework/Libraries'
9                                       ],
10                               'SDL' => 0,
11                               'GLU' => [
12                                          '/System/Library/Frameworks/OpenGL.framework/Headers',
13                                          '/System/Library/Frameworks/OpenGL.framework/Libraries'
14                                        ]
15                             },
16                 'SDL' => {
17                            'png' => 0,
18                            'SDL' => 0,
19                            'SDL_ttf' => 0,
20                            'SDL_svg' => 0,
21                            'SDL_net' => 0,
22                            'SDL_image' => 0,
23                            'jpeg' => 0,
24                            'SDL_gfx' => 0,
25                            'smpeg' => 0,
26                            'SDL_sound' => 0,
27                            'SDL_mixer' => 0
28                          },
29                 'SFont' => {
30                              'SDL_image' => 0,
31                              'SDL' => 0
32                            }
33               };
34
35 sub has
36 {
37         my ($class, $define) = @_;
38         scalar grep { $$sdl_config{$_}{$define} } keys %$sdl_config;
39 }
40
41 1;