Re: [MacPerl-Toolbox] QuickDraw and MacWindows

[Alan Fry <ajf@afco.demon.co.uk>]

At 6:43 pm -0400 27/06/00, Quentin Smith wrote:

>I think my mailer messed up, as those typos were not there. I can assure
>you, with the modifications I made, it works fine. Here's a complete version
>of the EasyWindow module with my modifications:

My local dial-up connection here in the middle of nowhere degenerates 
into two tin cans and a piece of string, so maybe that is where the 
problem arose.

Sorry, I misunderstood your intention -- in particular the 'sub { &{ 
$draw }' line. Sure, that works fine. I think we're in TMTOWTDI 
country now.

However I suspect your version suffers from the same drawback as my 
original version that the eval() gets called every update; because 
when the subroutine &{$draw} is called it in turn calls the eval() in 
'$draw = eval "sub {$str}"'.

However, does it really matter? I simply don't know what the 
penalties in terms of speed or memory might be in repeatedly running 
an eval(). One has a feeling there probably is a price to pay but I 
have no idea how to measure the effect.

Thanks very much for your contribution and interest.

Alan Fry

OT re mailer for interest's sake. The errors are still there:

At 6:43 pm -0400 27/06/00, Quentin Smith wrote:
>Here's what my previous message said according to my mailer:
>Hi-
>I modified my copy of EasyWindow as Kevin Reid suggested. Here is what I
>did:
>In the subroutine DRAWING, change $draw = $str; into $draw = eval "sub
>  $str }";
>In the subroutine WINDOW, where the redraw hook is defined, change
>val( $draw ) into &{ $draw }

==== Want to unsubscribe from this list?
==== Send mail with body "unsubscribe" to macperl-toolbox-request@macperl.org