| 1234567891011121314151617181920 | 
							- #!/bin/sh
 
- # Copyright 2013  The Tor Project, Inc.
 
- # See LICENSE for licensing information.
 
- # cov-diff -- compare two directories full of gcov files.
 
- DIRA="$1"
 
- DIRB="$2"
 
- for B in "$DIRB"/*; do
 
-   A=$DIRA/$(basename "$B")
 
-   if [ -f "$A" ]; then
 
-       perl -pe 's/^\s*\!*\d+(\*?):/        1$1:/; s/^([^:]+:)[\d\s]+:/$1/; s/^ *-:(Runs|Programs):.*//;' "$A" > "$A.tmp"
 
-   else
 
-       cat /dev/null > "$A.tmp"
 
-   fi
 
-   perl -pe 's/^\s*\!*\d+(\*?):/        1$1:/; s/^([^:]+:)[\d\s]+:/$1/; s/^ *-:(Runs|Programs):.*//;' "$B" > "$B.tmp"
 
-   diff -u "$A.tmp" "$B.tmp" |perl -pe 's/^((?:\+\+\+|---)(?:.*tmp))\s+.*/$1/;'
 
-   rm -f "$A.tmp" "$B.tmp"
 
- done
 
 
  |