getcwd line break 80 characters

Dear All,

I'm using the getcwd function on Ubuntu Linux and the return string contains a newline statement if the current directory name is longer than 80 characters:

program myWD use IFPORT implicit none character(len=1024) :: cwd integer :: error error = getcwd(cwd) print*, trim(cwd)//':' end program myWD

will give

/nethome/storage/raid4/m.diehl/DAMASK/testing/Spectral_parsingArguments/referen ce: /nethome/storage/raid4/m.diehl/DAMASK/testing/Spectral_parsingArguments/refere:

if I call the program from the folder 'reference' and 'refere', respectively. Tested with ifort 13.0.1 and 12.1.2.