Skip to content
Snippets Groups Projects
Commit fef6380b authored by RIETTE Sébastien's avatar RIETTE Sébastien
Browse files

Add control for CALL in mnh_expand blocs

parent dffe50f4
No related branches found
No related tags found
No related merge requests found
...@@ -87,6 +87,9 @@ def verify_mnh_expand(path): ...@@ -87,6 +87,9 @@ def verify_mnh_expand(path):
if line[:3].upper() == b'DO ': if line[:3].upper() == b'DO ':
logging.warning('A DO loop is inside a mnh_expand bloc, is order correct?. ' + logging.warning('A DO loop is inside a mnh_expand bloc, is order correct?. ' +
'Line {line} of file {filename}'.format(line=iline + 1, filename=path)) 'Line {line} of file {filename}'.format(line=iline + 1, filename=path))
elif line[:5].upper() == b'CALL ':
logging.warning('A CALL statement is inside a mnh_expand bloc, is it correct? ' +
'Line {line} of file {filename}'.format(line=iline + 1, filename=path))
elif b'=' in line and all([c in lhschar for c in line.split(b'=')[0]]): elif b'=' in line and all([c in lhschar for c in line.split(b'=')[0]]):
lhs = line.split(b'=')[0] lhs = line.split(b'=')[0]
if not b'(' in lhs: if not b'(' in lhs:
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment