The script works ok with strawberry perl 5.12.1.0. --Chris
On 11/21/2010 10:02 PM, Chris Marshall wrote: > On 11/21/2010 8:21 PM, Sisyphus wrote: >> >> ----- Original Message ----- From: "Chris Marshall" >> >>> I've attached a perl script that allows >>> you to try this out. >> >> Hi Chris, >> For me on Win32 (32-bit build of perl-5.12.2), the image pops up, then the >> script hangs and > > I have to ctrl-c the process. Even if I manually close the image box, > the script still hangs. > > Are you clicking on the TriD window and > typing 'q' to stop twiddling? > > Then you need to click in the Grab-1 window and > type 'q' to stop twiddling there. > > Then you can resize the TriD window again and > type 'q' after you've finished. > > After which the imag2d window Grab-2 will > appear and you'll have to click in it and > type 'q' to stop the event loop. > > At this point you can type<Enter> or > s<Enter> in the original window to > either stop the script or to save the > two images and then stop the script. > > And, yes, it is a pain with all the > clicking and q-ing. That is why having > the event loop active with the readline > interaction is on the TODO list. > > Thanks for trying this out, > Chris > >> The following is enough to produce the hang (nothing gets written to the >> console , even if warnings are enabled): >> >> ############################### >> #!/usr/bin/perl >> #use warnings; >> use PDL; >> use PDL::NiceSlice; >> use PDL::Graphics2D; >> use PDL::Graphics::TriD; >> >> # make TriD image >> line3d [sqrt(rvals(zeroes(50,50))/2)]; >> ############################### >> >> So ... I guess I never get to view the resized image to know if the bug >> you're looking at is present or not. I can, however, manually resize the >> pop-up to "full screen" (and back again) without any problems. >> >> Is that script you posted ok for you on MS Windows ? >> >> Cheers, >> Rob >> >> >> >> >> No virus found in this incoming message. >> Checked by AVG - www.avg.com >> Version: 9.0.869 / Virus Database: 271.1.1/3270 - Release Date: 11/21/10 >> 02:35:00 >> > > > _______________________________________________ > Perldl mailing list > [email protected] > http://mailman.jach.hawaii.edu/mailman/listinfo/perldl > > > > > No virus found in this incoming message. > Checked by AVG - www.avg.com > Version: 9.0.869 / Virus Database: 271.1.1/3270 - Release Date: 11/21/10 > 02:35:00 > _______________________________________________ Perldl mailing list [email protected] http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
