mirror of
https://gitlab.com/scemama/irpf90.git
synced 2024-12-22 04:13:33 +01:00
Version:1.1.9
This commit is contained in:
parent
da1125f785
commit
63a49efe15
@ -103,7 +103,8 @@ subroutine irp_trace
|
|||||||
end subroutine
|
end subroutine
|
||||||
"""
|
"""
|
||||||
|
|
||||||
txt = txt.splitlines()
|
txt = txt.split('\n')
|
||||||
|
txt = map(lambda x: x+"\n",txt)
|
||||||
if not util.same_file(FILENAME, txt):
|
if not util.same_file(FILENAME, txt):
|
||||||
file = open(FILENAME,'w')
|
file = open(FILENAME,'w')
|
||||||
file.writelines(txt)
|
file.writelines(txt)
|
||||||
|
@ -162,11 +162,12 @@ class Fmodule(object):
|
|||||||
|
|
||||||
def needed_modules(self):
|
def needed_modules(self):
|
||||||
if '_needed_modules' not in self.__dict__:
|
if '_needed_modules' not in self.__dict__:
|
||||||
buffer = filter(lambda x: isinstance(x,Use), self.generated_text)
|
buffer = filter(lambda x: x.lstrip().startswith("use "), \
|
||||||
buffer += filter(lambda x: isinstance(x,Use), self.head)
|
self.generated_text+self.head+self.residual_text)
|
||||||
buffer += filter(lambda x: isinstance(x,Use), self.residual_text)
|
buffer = map(lambda x: x.split()[1].lower(), buffer)
|
||||||
buffer = map(lambda x: x.text.split()[1].lower(), buffer)
|
|
||||||
self._needed_modules = make_single(buffer)
|
self._needed_modules = make_single(buffer)
|
||||||
|
if self.name in self._needed_modules:
|
||||||
|
self._needed_modules.remove(self.name)
|
||||||
return self._needed_modules
|
return self._needed_modules
|
||||||
needed_modules = property(needed_modules)
|
needed_modules = property(needed_modules)
|
||||||
|
|
||||||
|
@ -466,6 +466,7 @@ def irp_simple_statements(text):
|
|||||||
Subroutine : process_subroutine,
|
Subroutine : process_subroutine,
|
||||||
Function : process_function,
|
Function : process_function,
|
||||||
Program : process_program,
|
Program : process_program,
|
||||||
|
Provide : process_provide,
|
||||||
}
|
}
|
||||||
|
|
||||||
result = []
|
result = []
|
||||||
|
@ -1 +1 @@
|
|||||||
version = "1.1.8"
|
version = "1.1.9"
|
||||||
|
Loading…
Reference in New Issue
Block a user