mirror of https://gitlab.com/scemama/irpf90.git
36 lines
764 B
Python
36 lines
764 B
Python
#!/usr/bin/python
|
|
|
|
import sys
|
|
from irpf90_t import *
|
|
|
|
######################################################################
|
|
def fail(line,message):
|
|
assert isinstance(line,Line)
|
|
print """
|
|
Error:
|
|
-----
|
|
"""
|
|
if line.i > 0:
|
|
print "file %s, line %d:\n%s"%(line.filename,line.i,line.text)
|
|
print message, '\n'
|
|
sys.exit(1)
|
|
|
|
|
|
######################################################################
|
|
def warn(line,message):
|
|
assert isinstance(line,Line)
|
|
print """
|
|
Warning:
|
|
-------
|
|
"""
|
|
if line.i > 0:
|
|
print "file %s, line %d:\n%s"%(line.filename,line.i,line.text)
|
|
print message, '\n'
|
|
|
|
|
|
######################################################################
|
|
if __name__ == '__main__':
|
|
line = Empty_line(3,"empty", "testfile")
|
|
fail(line, "Message")
|
|
|