r5869 - trunk/misc/tools
DONOTREPLY at icculus.org
DONOTREPLY at icculus.org
Fri Feb 13 13:17:52 EST 2009
Author: div0
Date: 2009-02-13 13:17:52 -0500 (Fri, 13 Feb 2009)
New Revision: 5869
Modified:
trunk/misc/tools/shader-checksums.pl
Log:
compensate for more glitches
Modified: trunk/misc/tools/shader-checksums.pl
===================================================================
--- trunk/misc/tools/shader-checksums.pl 2009-02-13 17:58:58 UTC (rev 5868)
+++ trunk/misc/tools/shader-checksums.pl 2009-02-13 18:17:52 UTC (rev 5869)
@@ -38,15 +38,21 @@
my $brace_index = [grep { $line[$_] eq "}" } 0.. at line-1]->[0];
if(defined $brace_index)
{
- @nextline = splice @line, $brace_index || 1;
+ unshift @nextline, splice @line, $brace_index || 1;
}
# allow initial { token
if(@line >= 2 && $line[0] eq '{')
{
- @nextline = splice @line, 1;
+ unshift @nextline, splice @line, 1;
}
+ # in level 0, make the map name a separate token
+ if(@level == 0 && @line >= 2)
+ {
+ unshift @nextline, splice @line, 1;
+ }
+
$shadertext .= "@line\n";
if($line[0] eq '{')
More information about the nexuiz-commits
mailing list