[Numpy-svn] r6187 - trunk/numpy/f2py

numpy-svn@scip... numpy-svn@scip...
Mon Dec 22 04:05:05 CST 2008


Author: pearu
Date: 2008-12-22 04:05:00 -0600 (Mon, 22 Dec 2008)
New Revision: 6187

Modified:
   trunk/numpy/f2py/crackfortran.py
Log:
Fix a bug.

Modified: trunk/numpy/f2py/crackfortran.py
===================================================================
--- trunk/numpy/f2py/crackfortran.py	2008-12-22 10:01:51 UTC (rev 6186)
+++ trunk/numpy/f2py/crackfortran.py	2008-12-22 10:05:00 UTC (rev 6187)
@@ -2446,9 +2446,9 @@
     global skipfuncs, onlyfuncs
     setmesstext(block)
     ret=''
-    if type(block) is type([]):
+    if isinstance(block, list):
         for g in block:
-            if g['block'] in ['function','subroutine']:
+            if g and g['block'] in ['function','subroutine']:
                 if g['name'] in skipfuncs:
                     continue
                 if onlyfuncs and g['name'] not in onlyfuncs:



More information about the Numpy-svn mailing list