@@ -604,7 +604,6 @@ my $build_config =
604
604
{
605
605
FILES =>
606
606
" utils/glversion.txt " .
607
- " gl_exclude.h " .
608
607
" utils/glversion$Config {exe_ext} " .
609
608
" utils/glversion$Config {obj_ext}"
610
609
}
@@ -802,8 +801,6 @@ sub get_extensions
802
801
print " Testing for OpenGL Extensions\n " if ($verbose );
803
802
804
803
# clean up previous output files
805
- my $exc_file = ' gl_exclude.h' ;
806
- unlink ($exc_file ) if (-e $exc_file );
807
804
my $glv_file = ' utils/glversion.txt' ;
808
805
unlink ($glv_file ) if (-e $glv_file );
809
806
@@ -884,34 +881,10 @@ sub get_extensions
884
881
885
882
print " This looks like OpenGL Version: $gldata ->{VERSION}\n " ;
886
883
887
- # Parse glext_procs.h file
888
- open GLEXT, " glext_procs.h" or die " get_extensions: could not open glext_procs.h: $! \n " ;
889
- my @lines = <GLEXT>;
890
- close (GLEXT);
891
-
892
- my $no_ext = {};
893
- foreach my $line (@lines )
894
- {
895
- next if ($line !~ m |\# ifndef NO_([^\s ]+)| );
896
- my $ext = $1 ;
897
- next if ($ext =~ m | ^GL_VERSION_| );
898
- $no_ext -> {$ext }++;
899
- }
900
-
901
-
902
- # Create gl_exclude.h
903
- die " Unable to write to $exc_file \n " if (!open (GLEXC," >$exc_file " ));
904
- print GLEXC " // OpenGL Extension Exclusions - may be modified before building.\n " ;
905
- print GLEXC " //\n " ;
906
- print GLEXC " // Generated for " .$gldata -> {VENDOR }." , " .$gldata -> {RENDERER }." \n " ;
907
- print GLEXC " // OpenGL v" .$gldata -> {VERSION }." , using " ;
908
-
909
884
# Fix GLUT flags based on results
910
885
if ($gldata -> {FREEGLUT })
911
886
{
912
887
print ' Found FreeGLUT v' .$gldata -> {FREEGLUT }." \n " ;
913
- print GLEXC ' FreeGLUT v' .$gldata -> {FREEGLUT }." \n " ;
914
-
915
888
if (!$found -> {FREEGLUT } && !$found -> {FREEGLUT32 })
916
889
{
917
890
$found -> {FREEGLUT } = $lib ;
@@ -934,53 +907,6 @@ sub get_extensions
934
907
($GL_VERSION_MAJOR ,$GL_VERSION_MINOR ) = split (' .' , $GL_VERSION );
935
908
}
936
909
937
- # Make an empty exclusion file if a Windows distribution build
938
- if ($no_excl )
939
- {
940
- print " OpenGL Extension exclusions disabled\n " ;
941
- print GLEXC " //\n " ;
942
- print GLEXC " // Exclusions omitted for distribution build.\n " ;
943
- }
944
- else
945
- {
946
- print GLEXC " \n " ;
947
- if ($GL_VERSION )
948
- {
949
- print GLEXC " #define NO_GL_VERSION_4_5\n " if ($GL_VERSION < 4.5);
950
- print GLEXC " #define NO_GL_VERSION_4_4\n " if ($GL_VERSION < 4.4);
951
- print GLEXC " #define NO_GL_VERSION_4_3\n " if ($GL_VERSION < 4.3);
952
- print GLEXC " #define NO_GL_VERSION_4_2\n " if ($GL_VERSION < 4.2);
953
- print GLEXC " #define NO_GL_VERSION_4_1\n " if ($GL_VERSION < 4.1);
954
- print GLEXC " #define NO_GL_VERSION_4_0\n " if ($GL_VERSION < 4.0);
955
- print GLEXC " #define NO_GL_VERSION_3_3\n " if ($GL_VERSION < 3.3);
956
- print GLEXC " #define NO_GL_VERSION_3_2\n " if ($GL_VERSION < 3.2);
957
- print GLEXC " #define NO_GL_VERSION_3_1\n " if ($GL_VERSION < 3.1);
958
- print GLEXC " #define NO_GL_VERSION_3_0\n " if ($GL_VERSION < 3.0);
959
- print GLEXC " #define NO_GL_VERSION_2_1\n " if ($GL_VERSION < 2.1);
960
- print GLEXC " #define NO_GL_VERSION_2_0\n " if ($GL_VERSION < 2.0);
961
- print GLEXC " #define NO_GL_VERSION_1_5\n " if ($GL_VERSION < 1.5);
962
- print GLEXC " #define NO_GL_VERSION_1_4\n " if ($GL_VERSION < 1.4);
963
- print GLEXC " #define NO_GL_VERSION_1_3\n " if ($GL_VERSION < 1.3);
964
- print GLEXC " #define NO_GL_VERSION_1_2\n " if ($GL_VERSION < 1.2);
965
- print GLEXC " #define NO_GL_VERSION_1_1\n " if ($GL_VERSION < 1.1);
966
- }
967
-
968
- foreach my $ext (split (' ' ,$gldata -> {EXTENSIONS }))
969
- {
970
- next if (!$no_ext -> {$ext });
971
- $no_ext -> {$ext } = 0;
972
- }
973
-
974
- foreach my $ext (sort keys (%$no_ext ))
975
- {
976
- next if (!$no_ext -> {$ext });
977
- print GLEXC " #define NO_$ext \n " ;
978
- }
979
- }
980
-
981
- close (GLEXC);
982
-
983
-
984
910
# return Distributable Defs
985
911
print " Have Version Data\n " if ($verbose );
986
912
my $defines = ' -DHAVE_VER' ;
0 commit comments