Re: Nesting scrolled windows

[Sergei Steshenko <sergstesh yahoo com>]

--- On Wed, 9/10/08, Kevin Ryde <user42 zip com au> wrote:

> From: Kevin Ryde <user42 zip com au>
> Subject: Re: Nesting scrolled windows
> To: gtk-perl-list gnome org
> Date: Wednesday, September 10, 2008, 4:50 PM
> zentara <zentara1 sbcglobal net> writes:
> > This isn't important, I was just wondering if this
> type of setup is possible?
>
> I'd guess it is, but I'd suspect each scrolled
> window asks to a size
> that accomodates its child, so there's no scrolling
> until those scrolled
> windows are forced to be less (by their parents in turn, or
> whatever).
>
> >  @{$categories->{data}} = @data;
>
> Incidentally with 1.190 or the current cvs and the debian
> i386 5.10.0
> I get a segv at this line.  gdb claims
>
> #0  0x080cef8d in Perl_av_clear (my_perl=0x8aac008,
> av=0x8d4a50c) at av.c:436
> #1  0x08149852 in Perl_leave_scope (my_perl=0x8aac008,
> base=43) at scope.c:799
> #2  0x08149e1c in Perl_pop_scope (my_perl=0x8aac008) at
> scope.c:99
> #3  0x0815fd05 in Perl_pp_return (my_perl=0x8aac008) at
> pp_ctl.c:2065
> #4  0x080a597f in Perl_runops_debug (my_perl=0x8aac008) at
> dump.c:1931
> #5  0x080d57dd in Perl_call_sv (my_perl=0x8aac008,
> sv=0x8d41d2c, 
>     flags=<value optimized out>) at perl.c:2638
> #6  0x080bf866 in Perl_magic_setpack (my_perl=0x8aac008,
> sv=0x8d41d3c, 
>     mg=0x8d7be2c) at mg.c:1660
> #7  0x080c5565 in Perl_mg_set (my_perl=0x8aac008,
> sv=0x8d41d3c) at mg.c:277
> #8  0x080ea8c2 in Perl_pp_aassign (my_perl=0x8aac008) at
> pp_hot.c:1032
> #9  0x080a597f in Perl_runops_debug (my_perl=0x8aac008) at
> dump.c:1931
> #10 0x080d6eb1 in perl_run (my_perl=0x8aac008) at
> perl.c:2391
> #11 0x08063f45 in main (argc=2, argv=0xbff95224,
> env=0xbff95230)
>     at perlmain.c:113
>
> Inserting before it
>
>    $categories->{data} = [];
>
> seems to work.  Something freaky with
> "auto-vivification" maybe?
> _______________________________________________
> gtk-perl-list mailing list
> gtk-perl-list gnome org
> http://mail.gnome.org/mailman/listinfo/gtk-perl-list

Works fin on my S?USE 10.3 box with older Perl:

"
sergei z61m:~/junk> perl -v

This is perl, v5.8.8 built for i586-linux-thread-multi

Copyright 1987-2006, Larry Wall

Perl may be copied only under the terms of either the Artistic License or the
GNU General Public License, which may be found in the Perl 5 source kit.

Complete documentation for Perl, including FAQ lists, should be found on
this system using "man perl" or "perldoc perl".  If you have access to the
Internet, point your browser at http://www.perl.org/, the Perl Home Page.

sergei z61m:~/junk> cat -n test.pl
     1  #!/usr/bin/perl -w
     2
     3  use strict;
     4
     5  my @data = (1, 2, 3);
     6  my $categories;
     7
     8  @{$categories->{data}} = @data;
     9
    10  warn "\ {\$categories->{data}}= {$categories->{data}}";
sergei z61m:~/junk> ./test.pl
@{$categories->{data}}=1 2 3 at ./test.pl line 10.
sergei z61m:~/junk>               
".

I do not have 5.10.0 to try.

Would you file a bug ?

Thanks,
  Sergei.