Enable source-formatting tools to collapse multiple whitelines in the source to one.

diff --git a/scripts/formater.pl b/scripts/formater.pl
index f52cbbd31fb0dae8e3ec6698f80ff1966204c6ca..03f3b4a1d6c4ccfa1a48d471c0f77baadd8500ad 100755 (executable)
--- a/scripts/formater.pl
+++ b/scripts/formater.pl
@@ -176,11 +176,24 @@ sub input_filter{
     return 1;
 }
 
+my $last_line_was_empty=0;
+#param: a reference to input line
+#retval 1: print line
+#retval 0: don't print line
 sub output_filter{
     my($line)=@_;
 
+    # collapse multiple empty lines onto the first one
     if($$line =~ /^\s*$/){
-       return 1;
+      if ($last_line_was_empty==1) {
+        $$line="";
+        return 0;
+      } else {
+        $last_line_was_empty=1;
+        return 1;
+      }
+    } else {
+      $last_line_was_empty=0;
     }
 
     if($$line =~ s/\s*\/\/__ASTYLECOMMENT__//) {