Changeset 6bfe6a1 for memlog2dot


Ignore:
Timestamp:
05/28/15 18:15:39 (10 years ago)
Author:
Hal Finkel <hfinkel@…>
Branches:
master
Children:
0edbc98
Parents:
81dea5b
git-author:
Hal Finkel <hfinkel@…> (05/28/15 18:15:39)
git-committer:
Hal Finkel <hfinkel@…> (05/28/15 18:15:39)
Message:

don't print raw proc names by default

File:
1 edited

Legend:

Unmodified
Added
Removed
  • memlog2dot

    r81dea5b r6bfe6a1  
    55my $memlog_fn = $ARGV[0]; 
    66my $out_dir = $ARGV[1] || '.'; 
     7 
     8my $print_raw_proc_name = 0; 
    79 
    810if (! -f $memlog_fn) { 
     
    152154  } 
    153155 
    154   $ret .= basename($node->{'file_name'}); 
    155   if ($node->{'proc_name'} ne '?') { 
    156     $ret .= ' (' . $node->{'proc_name'} . '+0x' . $node->{'off'} . ')'; 
     156  $ret .= $node->{'file_name'}; 
     157  if ($print_raw_proc_name and $node->{'proc_name'} ne '?') { 
     158    $ret .= '\n' . $node->{'proc_name'} . '+0x' . $node->{'off'}; 
    157159  } 
    158160 
Note: See TracChangeset for help on using the changeset viewer.