| Subject: | small fix for linux/gfortran code |
| Date: | Thu, 26 Jun 2008 21:30:29 -0600 |
| To: | bug-ExtUtils-F77 [...] rt.cpan.org |
| From: | Derek Lamb <derek [...] boulder.swri.edu> |
$perl -we 'use ExtUtils::F77;'
ExtUtils::F77: Version 1.16
Loaded ExtUtils::F77 version 1.16
Found compiler g77
Use of uninitialized value in pattern match (m//) at
/usr/local/share/perl/5.8.8/ExtUtils/F77.pm line 251.
ExtUtils::F77: Using system=Linux compiler=G77
Checking for gcc in disguise:
Compiler is gcc version 4.1.3 20070929 (prerelease) (Ubuntu 4.1.2-16ubuntu2)
Runtime: -L/usr/lib/gcc/i486-linux-gnu/3.4.6/../../../../lib -L/usr/lib
-lg2c -lm -L/usr/lib/gcc/i486-linux-gnu/4.1.3 -lgcc
ExtUtils::F77: Validating
-L/usr/lib/gcc/i486-linux-gnu/3.4.6/../../../../lib -L/usr/lib -lg2c -lm
-L/usr/lib/gcc/i486-linux-gnu/4.1.3 -lgcc [ok]
ExtUtils::F77: Compiler: g77
ExtUtils::F77: Cflags: -O
The error "Use of uninitialized value in pattern match..." error above
occurs because find_in_path() can return 'undef'. This can be simply
fixed by applying this patch:
251c251
< if( $default =~ /gfortran/ )
---
Show quoted text
> if( defined $default && $default =~ /gfortran/ )
Derek