[Scummvm-cvs-logs] SF.net SVN: scummvm:[38798] scummvm/trunk/tools/cfsml.pl

[jvprat at users.sourceforge.net]

Revision: 38798
          http://scummvm.svn.sourceforge.net/scummvm/?rev=38798&view=rev
Author:   jvprat
Date:     2009-02-23 00:10:36 +0000 (Mon, 23 Feb 2009)

Log Message:
-----------
Don't generate extra whitespaces (forgot to commit it before)

Modified Paths:
--------------
    scummvm/trunk/tools/cfsml.pl

Modified: scummvm/trunk/tools/cfsml.pl
===================================================================
--- scummvm/trunk/tools/cfsml.pl	2009-02-22 23:32:28 UTC (rev 38797)
+++ scummvm/trunk/tools/cfsml.pl	2009-02-23 00:10:36 UTC (rev 38798)
@@ -193,7 +193,7 @@
 
 	while ((source != end) && (c = *source++) && (c > 31)) {
 		if (c == '\\') { // Escaped character?
-    			c = *source++;
+			c = *source++;
 			if ((c != '\\') && (c != '"')) // Un-escape 0-31 only
 				c -= ('a' - 1);
 		}
@@ -454,7 +454,7 @@
 
       print "	if (!save_struc->$n->{'name'})\n";
       print "		WSprintf(fh, \"\\\\null\\\\\");\n";
-      print "	else \n";
+      print "	else\n";
       print "		$types{$n->{'reftype'}}{'writer'}";
       print "(fh, save_struc->$n->{'name'});\n";
 
@@ -554,7 +554,7 @@
 	print "			return CFSML_FAILURE;\n";
 	print "		}\n";
 	print "		if (!assignment) {\n";
-	print "			if (!strcmp(token, \"}\")) \n";
+	print "			if (!strcmp(token, \"}\"))\n";
 	print "				closed = 1;\n";
 	print "			else {\n";
 	print "				_cfsml_error(\"Expected assignment or closing braces in line %d\\n\", *line);\n";
@@ -659,13 +659,13 @@
 	    print "					_cfsml_error(\"Token expected by $reader() for $name$helper at line %d\\n\", *line);\n";
 	    print "					return CFSML_FAILURE;\n";
 	    print "				}\n";
-	    print "			} else \n";
+	    print "			} else\n";
 	    print "				done = 1;\n";
 	    print "			} while (!done);\n";
 
 	    if ($n->{'array'} eq "dynamic") {
 		my @xpr = lvaluize($expression = $n->{'size'});
-		print "		 	save_struc->$xpr[0] = max $xpr[1]; // Set array size accordingly\n";
+		print "			save_struc->$xpr[0] = max $xpr[1]; // Set array size accordingly\n";
 	    }
 
 	    if ($n->{'maxwrite'}) {
@@ -683,7 +683,7 @@
 	    print "					_cfsml_error(\"Token expected by $reader() for $name at line %d\\n\", *line);\n";
 	    print "					return CFSML_FAILURE;\n";
 	    print "				}\n";
-	    print "			} else \n";
+	    print "			} else\n";
 	    print "				save_struc->$name = NULL;\n";
 	}
 	else { # It's a simple variable or a struct
@@ -749,7 +749,7 @@
     }
   }
   print "\n// Auto-generated CFSML declaration and function block ends here\n";
-  print "// Auto-generation performed by cfsml.pl $version \n";
+  print "// Auto-generation performed by cfsml.pl $version\n";
 }
 
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.