Wrapper for a Fortran routine in a file.
| 67 | ''' |
| 68 | |
| 69 | class FortranRoutine: |
| 70 | """Wrapper for a Fortran routine in a file. |
| 71 | """ |
| 72 | type = 'generic' |
| 73 | def __init__(self, name=None, filename=None): |
| 74 | self.filename = filename |
| 75 | if name is None: |
| 76 | root, ext = os.path.splitext(filename) |
| 77 | name = root |
| 78 | self.name = name |
| 79 | self._dependencies = None |
| 80 | |
| 81 | def dependencies(self): |
| 82 | if self._dependencies is None: |
| 83 | deps = fortran.getDependencies(self.filename) |
| 84 | self._dependencies = [d.lower() for d in deps] |
| 85 | return self._dependencies |
| 86 | |
| 87 | def __repr__(self): |
| 88 | return "FortranRoutine({!r}, filename={!r})".format(self.name, |
| 89 | self.filename) |
| 90 | |
| 91 | class UnknownFortranRoutine(FortranRoutine): |
| 92 | """Wrapper for a Fortran routine for which the corresponding file |