Ajout version Release/x64 avec les libraries x64 et tuning de la version Debug
This commit is contained in:
		
							
								
								
									
										60
									
								
								SQCSim2021/external/glew210/auto/bin/make_init.pl
									
									
									
									
										vendored
									
									
										Normal file
									
								
							
							
						
						
									
										60
									
								
								SQCSim2021/external/glew210/auto/bin/make_init.pl
									
									
									
									
										vendored
									
									
										Normal file
									
								
							@@ -0,0 +1,60 @@
 | 
			
		||||
#!/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';
 | 
			
		||||
 | 
			
		||||
#-------------------------------------------------------------------------------
 | 
			
		||||
 | 
			
		||||
# function pointer definition
 | 
			
		||||
sub make_pfn_def_init($%)
 | 
			
		||||
{
 | 
			
		||||
    #my $name = prefixname($_[0]);
 | 
			
		||||
    return "  r = ((" . $_[0] . " = (PFN" . (uc $_[0]) . "PROC)glewGetProcAddress((const GLubyte*)\"" . $_[0] . "\")) == NULL) || r;";
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
sub make_reuse_call($%)
 | 
			
		||||
{
 | 
			
		||||
	return "  r = _glewInit_" . $_[0] . "() || r;";
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
#-------------------------------------------------------------------------------
 | 
			
		||||
 | 
			
		||||
my @extlist = ();
 | 
			
		||||
my %extensions = ();
 | 
			
		||||
 | 
			
		||||
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);
 | 
			
		||||
		my $extvar = $extname;
 | 
			
		||||
		my $extvardef = $extname;
 | 
			
		||||
		$extvar =~ s/GL(X*)_/GL$1EW_/;
 | 
			
		||||
		if (keys %$functions or keys @$reuse)
 | 
			
		||||
		{
 | 
			
		||||
			print "#ifdef $extname\n\n";
 | 
			
		||||
			print "static GLboolean _glewInit_$extname ()\n{\n  GLboolean r = GL_FALSE;\n";
 | 
			
		||||
			output_reuse($reuse, \&make_reuse_call);
 | 
			
		||||
			output_decls($functions, \&make_pfn_def_init);
 | 
			
		||||
			print "\n  return r;\n}\n\n";
 | 
			
		||||
			print "#endif /* $extname */\n\n";
 | 
			
		||||
		}
 | 
			
		||||
	}
 | 
			
		||||
}
 | 
			
		||||
		Reference in New Issue
	
	Block a user