MacPerl-Digest Friday, March 19 1999 Volume 01 : Number 017 re: [MacPerl] 3D Ball - problems ---------------------------------------------------------------------- Date: Fri, 19 Mar 1999 09:46:39 +0000 From: Chris Sansom <chris@highway57.co.uk> Subject: re: [MacPerl] 3D Ball - problems At 15:14 +1030 19/3/99, Paul McCann spoke thusly: >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.) That looks to me like a simple matter of a hard return where there shouldn't be one. Would I be right in thinking '#BOXSIZE * 3.5 + 1;' should all be in one comment at the end of the line?... or is that # part of some advanced Perl syntax I'm not familiar with (I daresay I'm not much less of a novice than Paul in the context of this list!). In fact, now I look at the copy I saved, I see there are quite a few hard returns where you wouldn't generally expect them - of course that doesn't perturb Perl at all for the most part, as it's just seen as white space, but when it happens in the middle of a comment it 'breaks' the comment, thus uncommenting the part after the return. And I'm quite certain these hard returns have come about merely through the process of e-mailing. Cheers ... Chris ====================================================================== Chris Sansom - Highway 57 - Designs for the World Wide Web | chris@highway57.co.uk http://www.highway57.co.uk | ====================================================================== ===== Want to unsubscribe from this list? ===== Send mail with body "unsubscribe" to macperl-request@macperl.org ------------------------------ End of MacPerl-Digest V1 #17 **************************** ==== Want to unsubscribe from this list? ==== Send mail with body "unsubscribe" to ==== macperl-digest-request@macperl.org