Unmatched quote

Hello.
I have problem with compiling CALPOST downloaded from http://www.src.com . I try build under Linux with PGI 2012.
I got always this …

PGF90-S-0026-Unmatched quote (calpost.for: 15639)
PGF90-S-0026-Unmatched quote (calpost.for: 15653)
0 inform,   0 warnings,   2 severes, 0 fatal for readfn

this is an excerpt of source .

c --- QA on pathnames:  make sure that path ends in^M
c --- either '/' or '\', but do not assume which is correct for^M
c --- operating system (just report error)^M
      io=ioout^M
      if(ntspath.GT.0) then^M
         if(tspath(ntspath:ntspath).NE.'/' .AND.^M           ( LINE 15639 )
     &      tspath(ntspath:ntspath).NE.'\') then^M
            write(io,*)^M
            write(io,*)'READFN:  FATAL Error found in time-series path'^M
            write(io,*)'         Path must end in / or \, whichever '^M
            write(io,*)'         is correct for operating system'^M
            write(*,*)^M
            write(*,*)'READFN:  FATAL Error found in time-series path'^M
            write(*,*)'         Path must end in / or \, whichever '^M
            write(*,*)'         is correct for operating system'^M
            stop^M
         endif^M
      endif^M
      if(npath.GT.0) then^M
         if(plpath(npath:npath).NE.'/' .AND.^M               ( LINE 15653 ) 
     &      plpath(npath:npath).NE.'\') then^M
            write(io,*)^M
            write(io,*)'READFN:  FATAL Error found in plot-file path'^M
            write(io,*)'         Path must end in / or \, whichever '^M
            write(io,*)'         is correct for operating system'^M
            write(*,*)^M
            write(*,*)'READFN:  FATAL Error found in plot-file path'^M
            write(*,*)'         Path must end in / or \, whichever '^M
            write(*,*)'         is correct for operating system'^M
            stop^M
         endif^M
      endif^M

Thanks in advance .
Aro.

Hi Aro,

I think the problem is the backslash "" which is the escape character. To have the backslash be treated like any other character, add the flag “-Mbackslash”.

Hope this helps,
Mat

THANK YOU VERY MUCH !!!