From a249a125c9b2a9ed2a634bc1d705ecf1d0901cf7 Mon Sep 17 00:00:00 2001
From: Daniel Silverstone <dsilvers@netsurf-browser.org>
Date: Fri, 23 Mar 2012 17:45:07 +0000
Subject: Update various indents so generated C is easier to use gdb on

svn path=/trunk/libdom/; revision=13558
---
 test/DOMTSHandler.pm | 74 ++++++++++++++++++++++++++--------------------------
 1 file changed, 37 insertions(+), 37 deletions(-)

diff --git a/test/DOMTSHandler.pm b/test/DOMTSHandler.pm
index 4b469fe..64f5cfd 100644
--- a/test/DOMTSHandler.pm
+++ b/test/DOMTSHandler.pm
@@ -408,7 +408,7 @@ sub generate_var {
 		print " = $ats->{'value'};\n";
 	} else {
 		if ($type =~ m/\*/) {
-			print " = NULL;";
+			print " = NULL;\n";
 		} else {
 			print ";\n";
 		}
@@ -474,18 +474,18 @@ sub generate_load {
 	# define the test file path, use HTML if there is, otherwise using XML
 	# Attention: I intend to copy the test files to the program excuting dir
 	print "\tconst char *test$test_index = \"$ats{'href'}.html\";\n\n";
-	print "$doc = load_html(test$test_index, $ats{'willBeModified'});";
-	print "if ($doc == NULL) {";
+	print "\t$doc = load_html(test$test_index, $ats{'willBeModified'});";
+	print "\tif ($doc == NULL) {\n";
 	$test_index ++;
-	print "	 const char *test$test_index = \"$ats{'href'}.xml\";\n\n";
-	print "	 $doc = load_xml(test$test_index, $ats{'willBeModified'});";
-	print "	 if ($doc == NULL)";
-	print "			return 1;";
-	print "}";
+	print "\t\tconst char *test$test_index = \"$ats{'href'}.xml\";\n\n";
+	print "\t\t$doc = load_xml(test$test_index, $ats{'willBeModified'});\n";
+	print "\t\tif ($doc == NULL)\n";
+	print "\t\t\treturn 1;\n";
+	print "\t\t}\n";
 	print << "__EOF__";
-exp = dom_document_get_implementation($doc, &doc_impl);
-if (exp != DOM_NO_ERR)
-	return exp;
+	exp = dom_document_get_implementation($doc, &doc_impl);
+	if (exp != DOM_NO_ERR)
+		return exp;
 __EOF__
 
 	$self->addto_cleanup($doc);
@@ -562,20 +562,20 @@ sub generate_framework_statement {
 			if (not exists $ats->{"obj"}) {
 				my $var = $ats->{"var"};
 				my $dstring = generate_domstring($self, $dom_feature);
-				print "exp = dom_implregistry_get_dom_implementation($dstring, \&$var);";
-				print "if (exp != DOM_NO_ERR) {";
+				print "exp = dom_implregistry_get_dom_implementation($dstring, \&$var);\n";
+				print "\tif (exp != DOM_NO_ERR) {\n";
 				$self->cleanup_fail("\t\t");
-				print "return exp;}";
+				print "\t\treturn exp;\n\t}\n";
 				last;
 			}
 
 			my $obj = $ats->{"obj"};
 			my $var = $ats->{"var"};
 			# Here we directly output the libDOM's get_implementation API
-			print "exp = dom_document_get_implementation($obj, \&$var);";
-			print "if (exp != DOM_NO_ERR) {";
+			print "exp = dom_document_get_implementation($obj, \&$var);\n";
+			print "\tif (exp != DOM_NO_ERR) {\n";
 			$self->cleanup_fail("\t\t");
-			print "return exp;}";
+			print "\t\treturn exp;\n\t}\n";
 		}
 
 		# We deal with hasFeaturn and implementationAttribute in the generate_condition
@@ -732,18 +732,18 @@ sub generate_method {
 		}
 	}
 
-	print "exp = $method($params);";
+	print "\texp = $method($params);\n";
 
 	if ($self->{'exception'} eq 0) {
 		print << "__EOF__";
-		if (exp != DOM_NO_ERR) {
-			fprintf(stderr, "Exception raised from %s\\n", "$method");
+	if (exp != DOM_NO_ERR) {
+	fprintf(stderr, "Exception raised from %s\\n", "$method");
 __EOF__
 
 		$self->cleanup_fail("\t\t");
 		print << "__EOF__";
-			return exp;
-		}
+		return exp;
+	}
 __EOF__
 	}
 
@@ -806,27 +806,27 @@ sub generate_attribute_fetcher {
 	if ($ats{'obj'} eq $ats{'var'}) {
 		my $t = type_to_ctype($self->{'var'}->{$ats{'var'}});
 		$tnode_index ++;
-		print "$t tnode$tnode_index = NULL;";
-		print "exp = $fetcher($ats{'obj'}, \&tnode$tnode_index);";
+		print "\t$t tnode$tnode_index = NULL;\n";
+		print "\texp = $fetcher($ats{'obj'}, \&tnode$tnode_index);\n";
 		# The ats{'obj'} must have been added to cleanup stack 
 		$unref = 1;
 		# Indicate that we have created a temp node
 		$temp_node = 1;
 	} else {
 		$unref = $self->param_unref($ats{'var'});
-		print "exp = $fetcher($ats{'obj'}, \&$ats{'var'});";
+		print "\texp = $fetcher($ats{'obj'}, \&$ats{'var'});\n";
 	}
 
 
 	if ($self->{'exception'} eq 0) {
 		print << "__EOF__";
-		if (exp != DOM_NO_ERR) {
-			fprintf(stderr, "Exception raised when fetch attribute %s", "$en");
+	if (exp != DOM_NO_ERR) {
+		fprintf(stderr, "Exception raised when fetch attribute %s", "$en");
 __EOF__
 		$self->cleanup_fail("\t\t");
 		print << "__EOF__";
-			return exp;
-		}
+		return exp;
+	}
 __EOF__
 	}
 
@@ -1211,11 +1211,11 @@ sub generate_control_statement {
 				if ($conversion eq 1) {
 					print "\&tstring$temp_index)) {\n";
 					print "exp = dom_string_create((const uint8_t *)tstring$temp_index,";
-					print "strlen(tstring$temp_index), &$member);";
-					print "if (exp != DOM_NO_ERR) {";
-					print "fprintf(stderr, \"Can't create DOMString\\n\");";
+					print "strlen(tstring$temp_index), &$member);\n";
+					print "if (exp != DOM_NO_ERR) {\n";
+					print "\t\tfprintf(stderr, \"Can't create DOMString\\n\");";
 					$self->cleanup_fail("\t\t");
-					print "return exp; }";
+					print "\t\treturn exp;\n\t}\n";
 					$temp_index ++;
 				} else {
 					print "\&$member)) {\n";
@@ -1520,10 +1520,10 @@ sub param_unref {
 		if (exists $unref_prefix{$type}) {
 			$prefix = $unref_prefix{$type};
 		}
-		print "if ($var != NULL) {";
-		print $prefix."_unref(".$var.");\n";
-		print "$var = NULL;";
-		print "}";
+		print "\tif ($var != NULL) {\n";
+		print "\t\t" . $prefix."_unref(".$var.");\n";
+		print "\t\t$var = NULL;\n";
+		print "\t}\n";
 	}
 
 	foreach my $item (@{$self->{unref}}) {
-- 
cgit v1.2.3