Backups/source-engine-2018-hl2_src
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

1

Browse Source
This commit is contained in:
FluorescentCIAAfricanAmerican
2020-04-22 12:56:21 -04:00
commit 3bf9df6b27
15370 changed files with 5489726 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

25
unittests/autotestscripts/check_debug_dlls.pl Normal file
View File

@ -0,0 +1,25 @@
#!perl
use File::Find;
use Win32::API;
find(\&ProcessFile, "../../../game/bin/" );
sub ProcessFile
{
return if (/360/);
return unless( /\.dll$/i );
my $LoadLibrary = Win32::API->new( "kernel32", "LoadLibrary","P","L" );
my $GetProcAddress = Win32::API->new( "kernel32", "GetProcAddress","LP","L" );
my $FreeLibrary = Win32::API->new( "kernel32", "FreeLibrary", "P", "V" );
my $handle=$LoadLibrary->Call($_);
if ( $handle )
{
my $proc = $GetProcAddress->Call($handle, "BuiltDebug\0");
if ( $proc )
{
print "Error $_ is built debug\n";
}
$FreeLibrary->Call( $handle );
}
}