$ should be the last specifier in format at (1)

[Jack Howarth]

   Can anyone explain why the gfortran 4.3 branch compiler
produces the warning...

test2.f90:3.54:

WRITE (6,'($,71A1)',ERR=998) (VPROMPT(I:I),I=1,LENPR1)
                                                     1
Warning: $ should be the last specifier in format at (1)

when compiling the code fragment...

INTEGER LENPR1
CHARACTER*80 VPROMPT
WRITE (6,'($,71A1)',ERR=998) (VPROMPT(I:I),I=1,LENPR1)
  998 CONTINUE
end

while the ifort compiler accepts this code without complaint?
              Jack