Ajout version Release/x64 avec les libraries x64 et tuning de la version Debug
This commit is contained in:
		
							
								
								
									
										72
									
								
								SQCSim2021/external/glew210/auto/bin/make_header.pl
									
									
									
									
										vendored
									
									
										Normal file
									
								
							
							
						
						
									
										72
									
								
								SQCSim2021/external/glew210/auto/bin/make_header.pl
									
									
									
									
										vendored
									
									
										Normal file
									
								
							@@ -0,0 +1,72 @@
 | 
			
		||||
#!/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;
 | 
			
		||||
 | 
			
		||||
use lib '.';
 | 
			
		||||
do 'bin/make.pl';
 | 
			
		||||
 | 
			
		||||
# token
 | 
			
		||||
sub make_define($$)
 | 
			
		||||
{
 | 
			
		||||
    return "#define $_[0] $_[1]"
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
# type declaration
 | 
			
		||||
sub make_type($$)
 | 
			
		||||
{
 | 
			
		||||
    return "@_;"
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
# function pointer type declaration
 | 
			
		||||
sub make_pfn_type($%)
 | 
			
		||||
{
 | 
			
		||||
    our $api;
 | 
			
		||||
    return join(' ', "typedef", $_[1]->{rtype},
 | 
			
		||||
        "($api * PFN" . (uc $_[0]) . "PROC)",
 | 
			
		||||
        "(" . $_[1]->{parms} . ")") . ";";
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
# function name alias
 | 
			
		||||
sub make_pfn_alias($%)
 | 
			
		||||
{
 | 
			
		||||
    our $type;
 | 
			
		||||
    return join(" ", "#define", $_[0], $type . "EW_GET_FUN(" . prefixname($_[0]) . ")")
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
my @extlist = ();
 | 
			
		||||
my %extensions = ();
 | 
			
		||||
 | 
			
		||||
our $api = shift;
 | 
			
		||||
our $type = shift;
 | 
			
		||||
 | 
			
		||||
if (@ARGV)
 | 
			
		||||
{
 | 
			
		||||
    @extlist = @ARGV;
 | 
			
		||||
 | 
			
		||||
	foreach my $ext (sort @extlist)
 | 
			
		||||
	{
 | 
			
		||||
		my ($extname, $exturl, $extstring, $reuse, $types, $tokens, $functions, $exacts) = parse_ext($ext);
 | 
			
		||||
 | 
			
		||||
		make_separator($extname);
 | 
			
		||||
		print "#ifndef $extname\n#define $extname 1\n";
 | 
			
		||||
		output_tokens($tokens, \&make_define);
 | 
			
		||||
		output_types($types, \&make_type);
 | 
			
		||||
		output_exacts($exacts, \&make_exact);
 | 
			
		||||
		output_decls($functions, \&make_pfn_type);
 | 
			
		||||
		output_decls($functions, \&make_pfn_alias);
 | 
			
		||||
 | 
			
		||||
		my $extvar = $extname;
 | 
			
		||||
		$extvar =~ s/GL(X*)_/GL$1EW_/;
 | 
			
		||||
		
 | 
			
		||||
		print "\n#define $extvar " . $type . "EW_GET_VAR(" . prefix_varname($extvar) . ")\n";
 | 
			
		||||
		print "\n#endif /* $extname */\n\n";
 | 
			
		||||
	}
 | 
			
		||||
}
 | 
			
		||||
		Reference in New Issue
	
	Block a user