mirror of
https://gitlab.com/scemama/irpf90.git
synced 2025-01-05 02:48:38 +01:00
Merge with TApplencourt
This commit is contained in:
parent
ddfe8d9d18
commit
abca1022c7
@ -478,7 +478,7 @@ class Entity(object):
|
|||||||
" if (allocated(%s)) then"%(name),
|
" if (allocated(%s)) then"%(name),
|
||||||
" deallocate (%s)"%(name)]
|
" deallocate (%s)"%(name)]
|
||||||
if command_line.do_memory:
|
if command_line.do_memory:
|
||||||
result += " print *, 'Deallocating %s'"%(name)
|
result += [ " print *, 'Deallocating %s'"%(name) ]
|
||||||
|
|
||||||
result += [" endif"]
|
result += [" endif"]
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user