LCPQ/irpf90
10
0
Fork 0
mirror of https://gitlab.com/scemama/irpf90.git synced 2024-12-22 04:13:33 +01:00
Code Releases Activity

Aligned errays

Browse Source 
Version:1.1.76
This commit is contained in:
Anthony Scemama 2011-07-13 07:29:01 +02:00
parent 5a76800954
commit b42f50c0c4
3 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/preprocessed_text.py
View File

@ -146,7 +146,7 @@ instead of
if firstword.startswith("case("): if firstword.startswith("case("):
return [ Case(i,line,filename) ], is_doc return [ Case(i,line,filename) ], is_doc
if lower_line0[1:5] == "$omp": if lower_line0[1:5] in ["$omp", "dec$", "dir$"]:
return [ Openmp(i,line,filename) ], is_doc return [ Openmp(i,line,filename) ], is_doc
if re_decl.match(lower_line) is not None: if re_decl.match(lower_line) is not None:

2
src/variable.py
View File

@ -231,6 +231,8 @@ class Variable(object):
self._header = [ " %s :: %s %s"%(self.type, name, build_dim_colons(self) ) ] self._header = [ " %s :: %s %s"%(self.type, name, build_dim_colons(self) ) ]
if self.is_main: if self.is_main:
self._header += [ " logical :: %s_is_built = .False."%(name) ] self._header += [ " logical :: %s_is_built = .False."%(name) ]
if "allocatable" in self.type:
self._header += ["!DEC$ ATTRIBUTES ALIGN: 32 :: %s"%(name)]
return self._header return self._header
header = property(header) header = property(header)

2
src/version.py
View File

@ -1 +1 @@
version = "1.1.75" version = "1.1.76"