10
0
mirror of https://gitlab.com/scemama/irpf90.git synced 2024-06-24 14:12:08 +02:00
irpf90/src/modules.py
2009-09-08 16:00:46 +02:00

22 lines
545 B
Python

#!/usr/bin/python
def modify_functions():
result = []
for filename,text in parsed_text:
begin = -1
for i, (vars,line) in enumerate(text):
if type(line) in [ Subroutine, Function ]:
text[i] = [ text[i] ]
variable_list = list(vars)
begin = i
elif type(line) in [ End_provider, End ]:
text[begin].insert(1,map(lambda x: ([],x), build_use(variable_list)))
else:
variable_list += vars
text = flatten(text)
result.append ( (filename, text) )
def residual_text():
pass