10
0
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:
Anthony Scemama 2017-07-11 23:18:26 +02:00
parent ddfe8d9d18
commit abca1022c7

View File

@ -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"]