#50 Avoid long lines in the generated fortran code

[mrestelli]

Hi all,

the .F90 files generated by the pFUnit preprocessor can contain very
long lines, which exceed the standard limit and thus might require
specific additional compiler flags.

For me, the attached change in pFUnitParser.py solves the problem,
wrapping to the lines so that they don't exceed maxLen.

I wonder whether this could be included in pFUnit. Maybe, it would
make sense to use the self.fortranLine method in more places; the
attached one is a minimal change which works for me.

Thanks,
Marco

diff --git a/bin/pFUnitParser.py b/bin/pFUnitParser.py
index 87137ba..87dee7e 100755
--- a/bin/pFUnitParser.py
+++ b/bin/pFUnitParser.py
@@ -580,6 +580,12 @@ class Parser():
def commentLine(self, line):
self.outputFile.write(re.sub('@','!@',line))

• def fortranLine(self, line):
• maxLen = 70 # maximum line length for the fortran source -2
• rChunk = range(0, len(line), maxLen)
• self.outputFile.write( \

• "&\n&".join( [ line[i:i+maxLen] for i in rChunk ] ) )
  +
  def run(self):
  def parse(line):
  for action in self.actions:
  @@ -720,7 +726,7 @@ class Parser():
  elif 'tearDown' in self.userTestCase:
  args += ', ' + self.userTestCase['tearDown']

• self.outputFile.write(' call suite%addTest(newTestMethod(' + args + '))\n')

• self.fortranLine(' call suite%addTest(newTestMethod(' + args + '))\n')

  def addMpiTestMethod(self, testMethod):
  for npes in testMethod['npRequests']:

[mrestelli]

(Attaching the pach as a file)