summaryrefslogtreecommitdiff
path: root/src/cmd/prof/gopprof
diff options
context:
space:
mode:
Diffstat (limited to 'src/cmd/prof/gopprof')
-rwxr-xr-xsrc/cmd/prof/gopprof9
1 files changed, 4 insertions, 5 deletions
diff --git a/src/cmd/prof/gopprof b/src/cmd/prof/gopprof
index 8863fc623..8fa00cbe8 100755
--- a/src/cmd/prof/gopprof
+++ b/src/cmd/prof/gopprof
@@ -2880,18 +2880,17 @@ sub FetchSymbols {
my @toask = @pcs;
while (@toask > 0) {
my $n = @toask;
- # NOTE(rsc): Limiting the number of PCs requested per round
- # used to be necessary, but I think it was a bug in
- # debug/pprof/symbol's implementation. Leaving here
- # in case I am wrong.
- # if ($n > 49) { $n = 49; }
+ if ($n > 49) { $n = 49; }
my @thisround = @toask[0..$n];
+my $t = @toask;
+print STDERR "$n $t\n";
@toask = @toask[($n+1)..(@toask-1)];
my $post_data = join("+", sort((map {"0x" . "$_"} @thisround)));
open(POSTFILE, ">$main::tmpfile_sym");
print POSTFILE $post_data;
close(POSTFILE);
+print STDERR "SYMBL!\n";
my $url = SymbolPageURL();
$url = ResolveRedirectionForCurl($url);
my $command_line = "$CURL -sd '\@$main::tmpfile_sym' '$url'";