12 Jun 2022 1:55
#29041
I am using plato Ver 5.5.0 18/06/2021 ( actually 8/02/2022 ) FTN95 Ver 8.80.0 5/07/2021
I am getting an unexpected 'warning 12899 - Procedure expected for argument LINE'
However if I turn buildlog into buildlg.bat and run outside plato, I don't get the message
! get_next_line.f90
subroutine get_next_line ( line, iostat, nc, nf )
character :: line*132
integer*4 :: iostat, nc, nf
!
read ( 11, fmt='(a)', iostat=iostat ) line
if ( iostat < 0 ) return
if ( line(1:1) == '!' .or. &
line(1:1) == '#' ) then
nc = nc+1
write (*,*) trim(line)
iostat = 1
return
end if
if ( line(89:89) /= '!' ) then
nf = nf+1
write (*,*) 'inexpected type descriptor in following line'
write (*,*) trim(line)
iostat = 2
return
end if
end subroutine get_next_line
rem buildlg.bat
FTN95.EXE 'D:\Work\wanda_new\X1AB\get_next_line.f90' /NO_BANNER /VS7 /DELETE_OBJ_ON_ERROR /ERROR_NUMBERS /UNLIMITED_ERRORS /CHECKMATE
My ftn95.cfg is
/ERROR_NUMBERS
/ECHO_OPTIONS
/IMPLICIT_NONE
/INTL
/LOGL
I have been annoyed about the false warning for a while, but just now tried to track it down. Interesting that buildlg.bat doesn't report, but select Compile in Plato I do get the warning.
I don't appear to be able to copy from the Plato output window. Reports for both win32 and x64 and for checkmate / debug / release
Finally noticed Plato.exe is in more recent path selection, so will check further, as to what FTN95 is in use.