diff options
Diffstat (limited to 'numpy/f2py/lib/parsefortran.py')
| -rw-r--r-- | numpy/f2py/lib/parsefortran.py | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/numpy/f2py/lib/parsefortran.py b/numpy/f2py/lib/parsefortran.py index d4dc3d594..2341a0f22 100644 --- a/numpy/f2py/lib/parsefortran.py +++ b/numpy/f2py/lib/parsefortran.py @@ -19,6 +19,7 @@ class FortranParser: def __init__(self, reader): self.reader = reader + self.isfix77 = reader.isfix77 def get_item(self): try: @@ -45,7 +46,19 @@ python module foo end python module """ reader = FortranStringReader(string, True, True) - reader = FortranFileReader(filename) + parser = FortranParser(reader) + block = parser.parse() + print block + +def test_f77(): + string = """\ +c program foo + a = 3 + end + subroutine bar + end +""" + reader = FortranStringReader(string, False, True) parser = FortranParser(reader) block = parser.parse() print block @@ -60,5 +73,6 @@ def simple_main(): print block if __name__ == "__main__": + #test_f77() #test_pyf() simple_main() |