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 | |
| 74 | def __init__(self, name=None, filename=None): |
| 75 | self.filename = filename |
| 76 | if name is None: |
| 77 | root, ext = os.path.splitext(filename) |
| 78 | name = root |
| 79 | self.name = name |
| 80 | self._dependencies = None |
| 81 | |
| 82 | def dependencies(self): |
| 83 | if self._dependencies is None: |
| 84 | deps = fortran.getDependencies(self.filename) |
| 85 | self._dependencies = [d.lower() for d in deps] |
| 86 | return self._dependencies |
| 87 | |
| 88 | def __repr__(self): |
| 89 | return f"FortranRoutine({self.name!r}, filename={self.filename!r})" |
| 90 | |
| 91 | class UnknownFortranRoutine(FortranRoutine): |
| 92 | """Wrapper for a Fortran routine for which the corresponding file |
no outgoing calls
no test coverage detected
searching dependent graphs…