[HPADM] 64bit build for TK

From: Rajdeep Sengupta (rajdeep_at_noida.atrenta.com)
Date: 05/07/04

  • Next message: Bill Beardshaw: "[HPADM] PGP For Commercial Use" 
    Date: Fri, 07 May 2004 19:05:07 +0530
To: "Hpux-Admin (hpux-admin@dutchworks.nl)" <hpux-admin@DutchWorks.nl>

    Hi Managers,

    I am using Perl 5.6.1 on HP11 in 64-bit mode, compiled using aCC.
    While building perl/tk 8.022, when I run "make test", one of the
    testcases of browse entry fails with following error:

    Tk::Error: Can't set -choices to `ARRAY(0x800000010022f9a8)' for
    Tk::BrowseEntry=HASH(0x8000000100399830): Failed to AUTOLOAD
    'Tk::Widget::delete' at
    /delsoft/spyglass/import/Perl/perl-5.6.1/HPUX11/lib/site_perl/5.6.1/PA-RISC2.0_64/Tk/Derived.pm

    line 467

    I reduced down the the perl script of that testcase, which is attached at
    the end of this mail.
    It just creates two browse entry widgets, with different parameters.
    The first one passes, but the second browse entry call fails.
    Note the same script runs fine on all the other platforms like linux,
    sun, hp10 etc.

    I also tried Tk-800.025, but it also produced the same error for the
    same testcase.

    The same perl/Tk code when compiled on other platforms ( Red Hat Linux
    release 7.2 (Enigma) 2.4.7-10
    and SunOS jack 5.7 Generic_106541-08 sun4u sparc SUNW,Ultra-5_10) runs
    without any problems.

    --------------------- Script ----------------------------------------
    use Tk;
    use Tk::BrowseEntry;

    my $mw;
    $mw = Tk::MainWindow->new();
    $mw->geometry('+10+10');

    my(@listcmd, @browsecmd);
    my $listcmd = sub { @listcmd = @_ };
    my $browsecmd = sub { @browsecmd = @_ };

    my ($bla, $bla2);
    my $be = $mw->BrowseEntry(-listcmd => $listcmd, -browsecmd => $browsecmd,
    -textvariable => \$bla)->pack;
    my $be2 = $mw->BrowseEntry(-choices => [qw/a b c d e/], -textvariable =>
    \$bla2,
    -state => "normal")->pack;

    Tk::MainLoop;

    -------------------------------------------------------------------------------- 

    --
             ---> Please post QUESTIONS and SUMMARIES only!! <---
        To subscribe/unsubscribe to this list, contact majordomo@dutchworks.nl
       Name: hpux-admin@dutchworks.nl     Owner: owner-hpux-admin@dutchworks.nl
 
 Archives:  ftp.dutchworks.nl:/pub/digests/hpux-admin       (FTP, browse only)
            http://www.dutchworks.nl/htbin/hpsysadmin   (Web, browse & search)
  • Next message: Bill Beardshaw: "[HPADM] PGP For Commercial Use"