[Numpy-svn] r4375 - branches/numpy.scons/numpy/distutils/scons

numpy-svn@scip... numpy-svn@scip...
Fri Nov 2 03:34:44 CDT 2007


Author: cdavid
Date: 2007-11-02 03:34:41 -0500 (Fri, 02 Nov 2007)
New Revision: 4375

Modified:
   branches/numpy.scons/numpy/distutils/scons/fortran_scons.py
Log:
Return failure for F77 mangler check when dummy main check fails.

Modified: branches/numpy.scons/numpy/distutils/scons/fortran_scons.py
===================================================================
--- branches/numpy.scons/numpy/distutils/scons/fortran_scons.py	2007-11-02 08:31:54 UTC (rev 4374)
+++ branches/numpy.scons/numpy/distutils/scons/fortran_scons.py	2007-11-02 08:34:41 UTC (rev 4375)
@@ -1,4 +1,4 @@
-# Last Change: Mon Oct 29 03:00 PM 2007 J
+# Last Change: Fri Nov 02 05:00 PM 2007 J
 import os
 import sys
 import string
@@ -227,7 +227,9 @@
     name, returns the F77 name as seen by the linker."""
     env = context.env
     if not env.has_key('F77_DUMMY_MAIN'):
-        CheckF77DummyMain(context)
+        st = CheckF77DummyMain(context)
+        if st == 0:
+            return st
     context.Message('Checking %s name mangling - ' % env['F77'])
     res, mangler, u, du, c = _CheckFMangling(context, 'F77', env['F77_DUMMY_MAIN'], '.f')
     if res:



More information about the Numpy-svn mailing list