[Numpy-svn] r4561 - branches/numpy.scons/numpy/distutils/scons/tools

[numpy-svn at scipy.org]

Author: cdavid
Date: 2007-12-07 04:47:11 -0600 (Fri, 07 Dec 2007)
New Revision: 4561

Modified:
   branches/numpy.scons/numpy/distutils/scons/tools/f77.py
   branches/numpy.scons/numpy/distutils/scons/tools/fortran.py
Log:
Make .f built by F77 instead of FORTRAN

Modified: branches/numpy.scons/numpy/distutils/scons/tools/f77.py
===================================================================
--- branches/numpy.scons/numpy/distutils/scons/tools/f77.py	2007-12-07 09:20:49 UTC (rev 4560)
+++ branches/numpy.scons/numpy/distutils/scons/tools/f77.py	2007-12-07 10:47:11 UTC (rev 4561)
@@ -42,7 +42,7 @@
 compilers = ['f77']
 
 #
-F77Suffixes = ['.f77']
+F77Suffixes = ['.f77', '.f']
 F77PPSuffixes = []
 if SCons.Util.case_sensitive_suffixes('.f77', '.F77'):
     F77PPSuffixes.append('.F77')

Modified: branches/numpy.scons/numpy/distutils/scons/tools/fortran.py
===================================================================
--- branches/numpy.scons/numpy/distutils/scons/tools/fortran.py	2007-12-07 09:20:49 UTC (rev 4560)
+++ branches/numpy.scons/numpy/distutils/scons/tools/fortran.py	2007-12-07 10:47:11 UTC (rev 4561)
@@ -50,9 +50,9 @@
 #  rely on the c pre-processor, some (like cvf, ivf) have their own
 #  pre-processor technology and use intermediary suffixes (.i90)
 #
-FortranSuffixes = [".f", ".for", ".ftn", ]
+FortranSuffixes = [".for", ".ftn", ]
 FortranPPSuffixes = ['.fpp', '.FPP']
-upper_case = [".F", ".FOR", ".FTN"]
+upper_case = [".FOR", ".FTN"]
 if SCons.Util.case_sensitive_suffixes('.f', '.F'):
     FortranPPSuffixes.extend(upper_case)
 else: