Skip to content

Commit

Permalink
Make stackcollapse happy when a % is in the function name
Browse files Browse the repository at this point in the history
  • Loading branch information
Gabriel Corona committed Jan 1, 2015
1 parent fb79d14 commit 42b3fdc
Show file tree
Hide file tree
Showing 7 changed files with 7 additions and 7 deletions.
2 changes: 1 addition & 1 deletion dev/hcstackcollapse.pl
Original file line number Diff line number Diff line change
Expand Up @@ -83,5 +83,5 @@ sub remember_stack {
}

foreach my $k (sort { $a cmp $b } keys %collapsed) {
printf "$k $collapsed{$k}\n";
print "$k $collapsed{$k}\n";
}
2 changes: 1 addition & 1 deletion dev/thcstackcollapse.pl
Original file line number Diff line number Diff line change
Expand Up @@ -85,5 +85,5 @@ sub remember_stack {
}

foreach my $k (sort { $a cmp $b } keys %collapsed) {
printf "$k $collapsed{$k}\n";
print "$k $collapsed{$k}\n";
}
2 changes: 1 addition & 1 deletion stackcollapse-gdb.pl
Original file line number Diff line number Diff line change
Expand Up @@ -63,5 +63,5 @@
}

foreach my $k (sort { $a cmp $b } keys %stacks) {
printf "$k $stacks{$k}\n";
print "$k $stacks{$k}\n";
}
2 changes: 1 addition & 1 deletion stackcollapse-jstack.pl
Original file line number Diff line number Diff line change
Expand Up @@ -140,5 +140,5 @@ sub remember_stack {
}

foreach my $k (sort { $a cmp $b } keys %collapsed) {
printf "$k $collapsed{$k}\n";
print "$k $collapsed{$k}\n";
}
2 changes: 1 addition & 1 deletion stackcollapse-perf.pl
Original file line number Diff line number Diff line change
Expand Up @@ -118,5 +118,5 @@ sub remember_stack {
}

foreach my $k (sort { $a cmp $b } keys %collapsed) {
printf "$k $collapsed{$k}\n";
print "$k $collapsed{$k}\n";
}
2 changes: 1 addition & 1 deletion stackcollapse-recursive.pl
Original file line number Diff line number Diff line change
Expand Up @@ -56,5 +56,5 @@
}

foreach my $k (sort { $a cmp $b } keys %stacks) {
printf "$k $stacks{$k}\n";
print "$k $stacks{$k}\n";
}
2 changes: 1 addition & 1 deletion stackcollapse.pl
Original file line number Diff line number Diff line change
Expand Up @@ -83,5 +83,5 @@ sub remember_stack {
}

foreach my $k (sort { $a cmp $b } keys %collapsed) {
printf "$k $collapsed{$k}\n";
print "$k $collapsed{$k}\n";
}

0 comments on commit 42b3fdc

Please sign in to comment.