sub browser {
    my ($self,$repl) = @_;
    $repl ||= $self->repl;   
    print "repl: $repl\n";
    return $repl->declare(<<'JS')->();
    function () {  	
    	
        var wm = Components.classes["@mozilla.org/appshell/window-mediator;1"]
                           .getService(Components.interfaces.nsIWindowMediator);
        var win = wm.getMostRecentWindow('navigator:browser');
        if (! win) {
          // No browser windows are open, so open a new one.
          win = window.open('about:blank');
        };
        return win.gBrowser
        //return win.getBrowser()
}    

    
JS
};



sub declare {
    my ($self,$js,$context) = @_;
    print "1:$self; 2:$js;3:$context\n ";
  
    if (! $self->{functions}->{$js}) {
        $self->{functions}->{$js} = $self->expr($js);
        # Weaken the backlink of the function
        my $res = $self->{functions}->{$js};
        my $ref = ref $res;
        bless $res, "$ref\::HashAccess";
        weaken $res->{bridge};
        $res->{return_context} = $context;
        bless $res => $ref;
    };

    $self->{functions}->{$js}

};