location marker in error messages

["Daniel Franke" <franke dot daniel at gmail dot com>]

Hi all.

Please consider the following code:
MODULE class_graph_list_private
 USE class_graph_types, ONLY: user_data => graph
 include "generic_list.f90"
END MODULE

MODULE class_graph_list
USE class_graph_list_private, ONLY: graph_list           => list,              &
                                   graph                => user_data,         &
                                   graph_list_init      => list_init_default, &
                                   graph_list_free      => list_destroy,      &
                                   graph_list_insert    => list_push_back,    &
                                   graph_list_erase     =>
list_erase,        &    ! does not exist
                                   graph_list_size      => list_size,         &
                                   graph_list_to_array  => list_to_array

Since list_erase does not exist, gfortran-20070109 gives an error as:

                                   graph_list_insert    => list_push_back,    &
                                                                         1
Error: Symbol 'list_erase' referenced at (1) not found in module
'class_graph_list_private'
(the '1' should be below the ',' in "list_push_back,")

which is off by one line.

Brooks had a patch for error.c once that addressed a couple of issues
[1] and I think I can remember a discussion about moving the error
marker in argument list by one column. If someone addresses this at
some time, please also have a look at the issue above.

Thanks.
    Daniel

[1] http://gcc.gnu.org/ml/fortran/2006-11/msg00151.html