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

[FX Coudert]

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

$ as a format descriptor is an extension. We allow it for  
compatibility with g77, which only allowed it as last item in a  
format (see http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24285). Thus  
the warning.

> while the ifort compiler accepts this code without complaint?


Same answer as above; this is an extension, so there's no requirement  
on this. We follow g77.

FX

-- 
François-Xavier Coudert
http://www.homepages.ucl.ac.uk/~uccafco/