mirror of
https://github.com/nillerusr/source-engine.git
synced 2026-08-18 06:21:55 +00:00
1
This commit is contained in:
@@ -0,0 +1,36 @@
|
||||
use Cwd;
|
||||
|
||||
my $dir = getcwd;
|
||||
|
||||
chdir "../../materialsystem/stdshaders";
|
||||
|
||||
@output = `perl ..\\..\\devtools\\bin\\checkshaderchecksums.pl stdshader_dx9_20b.txt`;
|
||||
foreach $_ (@output)
|
||||
{
|
||||
$output.=$_ unless(/appchooser360/i);
|
||||
}
|
||||
|
||||
@output = `perl ..\\..\\devtools\\bin\\checkshaderchecksums.pl stdshader_dx9_30.txt`;
|
||||
foreach $_ (@output)
|
||||
{
|
||||
$output.=$_ unless(/appchooser360/i);
|
||||
}
|
||||
|
||||
my $errors;
|
||||
|
||||
foreach $_ (@output )
|
||||
{
|
||||
$errors.=$_ unless (/appchooser360movie/);
|
||||
}
|
||||
|
||||
chdir $dir;
|
||||
|
||||
print $errors;
|
||||
|
||||
if( length( $errors ) > 0 )
|
||||
{
|
||||
print "writing errors.txt\n";
|
||||
open FP, ">errors.txt";
|
||||
print FP "$errors";
|
||||
close FP;
|
||||
}
|
||||
Reference in New Issue
Block a user