re: [MacPerl] 3D Ball - problems

["Paul McCann" <pmccann@maths.adelaide.edu.au>]

Hi Kevin,

          On Friday, 19 March 1999 11:45 AM  you wrote:

>Several people have reported problems with my recently-posted "3D Ball"
>program. These problems include:

>  * "Useless use of a constant in void context" an lines 68 & 70

Using "use diagnostics" near the top of the program gave the
following expansion of this.
-----
(W) You did something without a side effect in a context that does nothing
    with the return value, such as a statement that doesn't return a value
    from a block, or the left side of a scalar comma operator.  Very often
    this points not to stupidity on your part, but a failure of Perl to
 parse    your program the way you thought it would.
-----

Looking at the code, it seems that this is related to the two lines
that read "3.5+1;" in the following segment:
-----

use constant WINSIZEH => $ScrnRect->right - $ScrnRect->left; #BOXSIZE *
3.5 + 1;
use constant WINSIZEV => $ScrnRect->bottom - $ScrnRect->top; #BOXSIZE *
3.5 + 1;
use constant WINRECT => new Rect (0, 0, WINSIZEH, WINSIZEV);
-----

Commenting out these allowed the script to compile (under -w)
without complaint, and also had the (desirable I guess!) side-effect
of changing my frame rate to 200 from about 20. Am I missing
something here? (I'm a novice macperler, and would appreciate
someone explaining what the assignments in question are actually
doing.)

Cheers,
        Paul

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