author Peter Van der Beken <>
Mon, 31 Dec 2018 10:51:32 +0000
changeset 452189 8b60851b93da2cf1f622e1bad41ba2e0527876c5
parent 94475 f4157e8c410708d76703f19e4dfb61859bfe32d8
permissions -rwxr-xr-x
Bug 1353867 - Change WindowProxyHolder's native type to BrowsingContext. r=bzbarsky Make the WindowProxyHolder hold a strong reference to a BrowsingContext, as in the future we might not have a nsPIDOMWindowOuter (if the document is loaded in a different process). Differential Revision:

#!/usr/bin/perl -w
# This Source Code Form is subject to the terms of the Mozilla Public
# License, v. 2.0. If a copy of the MPL was not distributed with this
# file, You can obtain one at

# Filter a refcount log to show only the entries for a single object.
# Useful when manually examining refcount logs containing multiple
# objects.

use 5.004;
use strict;
use Getopt::Long;


$::opt_object ||
     die qq{
usage: < logfile
  --object <obj>         The address of the object to examine (required)

warn "object $::opt_object\n";

LINE: while (<>) {
    next LINE if (! /^</);
    my $line = $_;
    my @fields = split(/ /, $_);

    my $class = shift(@fields);
    my $obj   = shift(@fields);
    next LINE unless ($obj eq $::opt_object);
    my $sno   = shift(@fields);
    my $op  = shift(@fields);
    my $cnt = shift(@fields);

    print $line;

    # The lines in the stack trace
    CALLSITE: while (<>) {
        last CALLSITE if (/^$/);