ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/DC/OpenGL.pm
(Generate patch)

Comparing deliantra/Deliantra-Client/DC/OpenGL.pm (file contents):
Revision 1.13 by root, Wed Dec 26 20:46:39 2007 UTC vs.
Revision 1.15 by root, Sat Aug 30 04:43:02 2008 UTC

1package dc::OpenGL; 1package DC::OpenGL;
2 2
3use strict; 3use strict;
4 4
5use Carp (); 5use Carp ();
6use dc; 6use DC;
7 7
8our %GL_EXT; 8our %GL_EXT;
9our $GL_VERSION; 9our $GL_VERSION;
10 10
11our $GL_NPOT; 11our $GL_NPOT;
… …
19sub import { 19sub import {
20 my $caller = caller; 20 my $caller = caller;
21 21
22 no strict; 22 no strict;
23 23
24 my $symtab = *{"main::dc::OpenGL::"}{HASH}; 24 my $symtab = *{"main::DC::OpenGL::"}{HASH};
25 25
26 for (keys %$symtab) { 26 for (keys %$symtab) {
27 *{"$caller\::$_"} = *$_ 27 *{"$caller\::$_"} = *$_
28 if /^(?:gl[A-Z_]|GL_)/; 28 if /^(?:gl[A-Z_]|GL_)/;
29 } 29 }
… …
52 } 52 }
53 53
54 $GL_BFSEP = $GL_EXT{GL_EXT_blend_func_separate} || $GL_VERSION >= 2.0; 54 $GL_BFSEP = $GL_EXT{GL_EXT_blend_func_separate} || $GL_VERSION >= 2.0;
55 $GL_NPOT = $GL_EXT{GL_ARB_texture_non_power_of_two} || $GL_VERSION >= 2.0; 55 $GL_NPOT = $GL_EXT{GL_ARB_texture_non_power_of_two} || $GL_VERSION >= 2.0;
56 $GL_COMPRESS = $GL_EXT{GL_ARB_texture_compression} || $GL_VERSION >= 1.3; 56 $GL_COMPRESS = $GL_EXT{GL_ARB_texture_compression} || $GL_VERSION >= 1.3;
57
58 $GL_COMPRESS = 0 if DC::OpenGL::gl_vendor eq "Apple Computer, Inc."; # there is no end to their suckage
57 59
58 disable_GL_EXT_blend_func_separate 60 disable_GL_EXT_blend_func_separate
59 unless $GL_BFSEP; 61 unless $GL_BFSEP;
60 62
61 glDisable GL_COLOR_MATERIAL; 63 glDisable GL_COLOR_MATERIAL;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines