FTN95 Error with PAD in OPEN

The following program gives incorrect result:

!    [JvO]         2005-10-30          Pad-err.f90
 Program Advance_0
!-->
   Integer, Parameter :: inp = 13
   character (len=6)  :: Inq

   OPEN(Unit=inp, File = 'ADV.inp', PAD='NO')
   Inquire(Unit = inp, Pad = Inq)
   Print *, 'Input Pad: ', Inq   ! <=============
 End Program Advance_0

! D:\Fortran\Error\Salford>ftn95 /check pad-err.f90 /lgo
! [FTN95/Win32 Ver. 4.8.0 Copyright (C) Salford Software Ltd 1993-2005]
!     NO ERRORS  [<ADVANCE_0> FTN95/Win32 v4.8.0]
! Creating executable: D:\Fortran\Error\Salford\lgotemp@.exe
! Program entered
!  Input Pad: YES

[JvO]

Jan

Thank you for this bug report.

The bug has now been fixed and the fix will be included in the next release.

Regards

Paul