Fixed Rect extension test but still not statisfied
[sdlgit/SDL_perl.git] / lib / SDL / Config.pm
1 package SDL::Config;
2
3 my $sdl_config; 
4 $sdl_config = {
5                 'Rect' => {
6                             'SDL' => [
7                                        '/usr/include/SDL',
8                                        '/usr/lib'
9                                      ]
10                           },
11                 'OpenGL' => {
12                               'GL' => [
13                                         '/usr/include/GL',
14                                         '/usr/lib'
15                                       ],
16                               'SDL' => [
17                                          '/usr/include/SDL',
18                                          '/usr/lib'
19                                        ],
20                               'GLU' => [
21                                          '/usr/include/GL',
22                                          '/usr/lib'
23                                        ]
24                             },
25                 'SDL' => {
26                            'png' => [
27                                       '/usr/include',
28                                       '/usr/lib'
29                                     ],
30                            'SDL' => [
31                                       '/usr/include/SDL',
32                                       '/usr/lib'
33                                     ],
34                            'SDL_ttf' => [
35                                           '/usr/include/SDL',
36                                           '/usr/lib'
37                                         ],
38                            'SDL_net' => [
39                                           '/usr/include/SDL',
40                                           '/usr/lib'
41                                         ],
42                            'SDL_image' => [
43                                             '/usr/include/SDL',
44                                             '/usr/lib'
45                                           ],
46                            'SDL_gfx' => [
47                                           '/usr/include/SDL',
48                                           '/usr/lib'
49                                         ],
50                            'jpeg' => [
51                                        '/usr/include',
52                                        '/usr/lib'
53                                      ],
54                            'smpeg' => [
55                                         '/usr/include/smpeg',
56                                         '/usr/lib'
57                                       ],
58                            'SDL_mixer' => [
59                                             '/usr/include/SDL',
60                                             '/usr/lib'
61                                           ]
62                          },
63                 'SFont' => {
64                              'SDL_image' => [
65                                               '/usr/include/SDL',
66                                               '/usr/lib'
67                                             ],
68                              'SDL' => [
69                                         '/usr/include/SDL',
70                                         '/usr/lib'
71                                       ]
72                            }
73               };
74
75 sub has
76 {
77         my ($class, $define) = @_;
78         scalar grep { $$sdl_config{$_}{$define} } keys %$sdl_config;
79 }
80
81 1;