home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / comp / lang / perl / 7035 < prev    next >
Encoding:
Text File  |  1992-11-17  |  800 b   |  30 lines
  1. Newsgroups: comp.lang.perl
  2. Path: sparky!uunet!caen!malgudi.oar.net!chemabs!jon
  3. From: jon@cas.org (Jon Vander Hill)
  4. Subject: bug/typo in 4.035 bigfloat.pl
  5. Message-ID: <JON.92Nov17203430@cas.org>
  6. Sender: usenet@cas.org
  7. Organization: Chemical Abstracts Service, Columbus, Ohio
  8. Distribution: comp
  9. Date: Wed, 18 Nov 1992 01:34:30 GMT
  10. Lines: 18
  11.  
  12.  
  13. In our Perl 4.035 distribution, bigfloat.pl generates the
  14. following syntax error:
  15.  
  16. -> perl -c /usr/perl/lib/bigfloat.pl
  17. syntax error in file /usr/perl/lib/bigfloat.pl at line 70, next 2 tokens "=^"
  18. /usr/perl/lib/bigfloat.pl had compilation errors.
  19.  
  20. The bad line is:
  21.  
  22.     vec($_,0,8) =^ ord('+') ^ ord('-') unless $_ eq '+0E+0'; # flip sign
  23.  
  24. and should be:
  25.  
  26.     vec($_,0,8) ^= ord('+') ^ ord('-') unless $_ eq '+0E+0'; # flip sign
  27.  
  28. Jon Vander Hill
  29. jon@cas.org
  30.