diff options
author | Pearu Peterson <pearu.peterson@gmail.com> | 2006-10-31 13:28:31 +0000 |
---|---|---|
committer | Pearu Peterson <pearu.peterson@gmail.com> | 2006-10-31 13:28:31 +0000 |
commit | d02c44d0712059c51b913771141ffbcd7bdb7506 (patch) | |
tree | fd0e230207555b186ef2a14dbb3f7653b19aefeb /numpy/f2py/lib/parser/readfortran.py | |
parent | b18a794fef392866fc973f40f9f48108d52345e2 (diff) | |
download | numpy-d02c44d0712059c51b913771141ffbcd7bdb7506.tar.gz |
F2PY: Cont implementing Fortran 2003 parser. Clean up.
Diffstat (limited to 'numpy/f2py/lib/parser/readfortran.py')
-rw-r--r-- | numpy/f2py/lib/parser/readfortran.py | 19 |
1 files changed, 18 insertions, 1 deletions
diff --git a/numpy/f2py/lib/parser/readfortran.py b/numpy/f2py/lib/parser/readfortran.py index 508829063..dfe64b4f1 100644 --- a/numpy/f2py/lib/parser/readfortran.py +++ b/numpy/f2py/lib/parser/readfortran.py @@ -268,7 +268,7 @@ class FortranReaderBase: pass return - def put_item(self): + def put_item(self, item): self.fifo_item.insert(0, item) return # Iterator methods: @@ -389,6 +389,7 @@ class FortranReaderBase: def show_message(self, message, stream = sys.stdout): stream.write(message+'\n') stream.flush() + return def format_message(self, kind, message, startlineno, endlineno, startcolno=0, endcolno=-1): @@ -424,6 +425,22 @@ class FortranReaderBase: return self.format_message('WARNING',message, startlineno, endlineno, startcolno, endcolno) + def error(self, message, item=None): + if item is None: + m = self.format_error_message(message, len(self.source_lines)-2, len(self.source_lines)) + else: + m = self.format_error_message(message, item.span[0], item.span[1]) + self.show_message(m) + return + + def warning(self, message, item=None): + if item is None: + m = self.format_warning_message(message, len(self.source_lines)-2, len(self.source_lines)) + else: + m = self.format_warning_message(message, item.span[0], item.span[1]) + self.show_message(m) + return + # Auxiliary methods for processing raw source lines: def handle_cf2py_start(self, line): |