Lines Matching refs:routine
137 # Special routine name that should not have any symbols.
846 my $routine;
848 ($routine, $ignore) = ParseInteractiveArgs($3);
881 my $routine;
883 ($routine, $ignore) = ParseInteractiveArgs($2);
892 PrintListing($total, $libs, $flat, $cumulative, $routine, $html);
898 my $routine;
900 ($routine, $ignore) = ParseInteractiveArgs($1);
910 PrintDisassembly($libs, $flat, $cumulative, $routine);
999 the "focus" regular expression matches a routine name on the stack
1036 For commands that accept optional -ignore tags, samples where any routine in
1272 foreach my $routine (sort ByName keys(%{$symbol_table})) {
1273 my $start_addr = $symbol_table->{$routine}->[0];
1274 my $end_addr = $symbol_table->{$routine}->[1];
1275 # See if there are any samples in this routine
1281 $routine, $flat, $cumulative,
1398 foreach my $routine (sort ByName keys(%{$symbol_table})) {
1399 # Print if there are any samples in this routine
1400 my $start_addr = $symbol_table->{$routine}->[0];
1401 my $end_addr = $symbol_table->{$routine}->[1];
1408 $routine, $flat, $cumulative,
1534 # After this routine has run, each entry in $instructions contains:
1565 # Print source-listing for one routine
1569 my $routine = shift;
1582 # disassembly contains the routine
1591 print STDERR "no filename found in $routine\n";
1750 HtmlEscape(ShortFunctionName($routine)),
1757 "ROUTINE ====================== %s in %s\n" .
1759 ShortFunctionName($routine),
1858 # Print disassembly for one routine with interspersed source if available
1862 my $routine = shift;
1892 printf("ROUTINE ====================== %s\n" .
1894 ShortFunctionName($routine),
4711 # MapSymbolsWithNM tags each routine with its starting address,
4713 # routine. (It uses a syntax that resembles template paramters,
4717 # (nm) version of the routine-name. TODO(csilvers): this won't
4984 my $routine = "";
5009 $routine = $this_routine;
5020 # Tag this routine with the starting address in case the image
5021 # has multiple occurrences of this routine. We use a syntax
5026 if (defined($routine) && $routine =~ m/$regexp/) {
5027 $symbol_table->{$routine} = [HexExtend($last_start),
5031 $routine = $this_routine;
5045 if (defined($routine) && $routine =~ m/$regexp/) {
5046 $symbol_table->{$routine} = [HexExtend($last_start),
5138 # This routine removes the underscores, producing the canonical representation
