> Bil Kleb wrote:
>
>> I'm looking for tips on how to quiet "set but never used"
>> warnings so that I can turn on -Werror (so any warnings
>> produce compilation failures).
>
>> I quite often encounter the idiom,
>
>> integer :: nblocks_dum ! position holder for read
>
>> read(8) nblocks_dum, other, useful, data
Since all of the problems are with the read, why not
just mess up that statement.
read(8) other, other, useful, data !skip the first value
or even
read(8) (other, i=1,n_skip) other, useful, data ! skip n_skip fields
It puts all of the bad stuff on one line.
Dick Hendrickson
PS, I thought about doing the last line as
read(8) (other, i=1,n_skip+1), useful, data ! skip n_skip fields
but that is too obscure to even mention!


|