OLD | NEW |
1 #!/usr/bin/perl | 1 #!/usr/bin/perl |
2 | 2 # Copyright (c) 2012 The Chromium Authors. All rights reserved. |
| 3 # Use of this source code is governed by a BSD-style license that can be |
| 4 # found in the LICENSE file. |
3 # | 5 # |
4 # Given a memwatcher logfile, group memory allocations by callstack. | 6 # Given a memwatcher logfile, group memory allocations by callstack. |
5 # | 7 # |
6 # Usage: | 8 # Usage: |
7 # | 9 # |
8 # memprof.pl <logfile> | 10 # memprof.pl <logfile> |
9 # | 11 # |
10 # logfile -- The memwatcher.logXXXX file to summarize. | 12 # logfile -- The memwatcher.logXXXX file to summarize. |
11 # | 13 # |
12 # | 14 # |
(...skipping 92 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
105 } | 107 } |
106 | 108 |
107 # ----- Main ------------------------------------------------ | 109 # ----- Main ------------------------------------------------ |
108 | 110 |
109 # Get the command line argument | 111 # Get the command line argument |
110 my $filename = shift; | 112 my $filename = shift; |
111 my $filter = shift; | 113 my $filter = shift; |
112 | 114 |
113 # Process the file. | 115 # Process the file. |
114 process_raw($filename, $filter); | 116 process_raw($filename, $filter); |
OLD | NEW |