Welcome to mirror list, hosted at ThFree Co, Russian Federation.

github.com/WolfireGames/overgrowth.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'Libraries/glew-2.0.0/auto/bin/make_list.pl')
-rw-r--r--Libraries/glew-2.0.0/auto/bin/make_list.pl73
1 files changed, 0 insertions, 73 deletions
diff --git a/Libraries/glew-2.0.0/auto/bin/make_list.pl b/Libraries/glew-2.0.0/auto/bin/make_list.pl
deleted file mode 100644
index ef1d81eb..00000000
--- a/Libraries/glew-2.0.0/auto/bin/make_list.pl
+++ /dev/null
@@ -1,73 +0,0 @@
-#!/usr/bin/perl
-##
-## Copyright (C) 2002-2008, Marcelo E. Magallon <mmagallo[]debian org>
-## Copyright (C) 2002-2008, Milan Ikits <milan ikits[]ieee org>
-##
-## This program is distributed under the terms and conditions of the GNU
-## General Public License Version 2 as published by the Free Software
-## Foundation or, at your option, any later version.
-
-use strict;
-use warnings;
-
-do 'bin/make.pl';
-
-#---------------------------------------------------------------------------------------
-
-# function pointer definition
-sub make_init_call($%)
-{
- my $name = prefixname($_[0]);
- return " r = r || (" . $_[0] . " = (PFN" . (uc $_[0]) . "PROC)glewGetProcAddress(\"" . $name . "\")) == NULL;";
-}
-
-#---------------------------------------------------------------------------------------
-
-my @extlist = ();
-my %extensions = ();
-
-if (@ARGV)
-{
- @extlist = @ARGV;
-
- foreach my $ext (sort @extlist)
- {
- my ($extname, $exturl, $extstring, $reuse, $types, $tokens, $functions, $exacts) = parse_ext($ext);
-
- my $extvar = $extname;
- $extvar =~ s/GL(X*)_/GL$1EW_/;
-
- my $extpre = $extname;
- $extpre =~ s/^(W?E?)GL(X?).*$/\l$1gl\l$2ew/;
-
- #my $pextvar = prefix_varname($extvar);
-
- if (length($extstring) && $extstring !~ /^GL_/ || keys %$functions)
- {
- print "#ifdef $extname\n";
- }
-
- if (length($extstring) && $extstring !~ /^GL_/)
- {
- print " " . $extvar . " = _glewSearchExtension(\"$extstring\", extStart, extEnd);\n";
- }
-
- if (keys %$functions)
- {
- if ($extname =~ /WGL_.*/)
- {
- print " if (glewExperimental || " . $extvar . "|| crippled) " . $extvar . "= !_glewInit_$extname();\n";
- }
- else
- {
- print " if (glewExperimental || " . $extvar . ") " . $extvar . " = !_glewInit_$extname();\n";
- }
- }
-
- if (length($extstring) && $extstring !~ /^GL_/ || keys %$functions)
- {
- print "#endif /* $extname */\n";
- }
- }
-
-}