diff options
author | Andrew Cagney <cagney@redhat.com> | 2001-02-08 06:03:54 +0000 |
---|---|---|
committer | Andrew Cagney <cagney@redhat.com> | 2001-02-08 06:03:54 +0000 |
commit | 8e65ff28b0780a52bdbe067b6297a66f9ec4e16e (patch) | |
tree | 1cf3436ec5c6d3e4f4dedb4ee2ccfa2c107dc33b /gdb/f-lang.c | |
parent | 8ca8f343f993cbe9937ef15e8cbbee95613c2016 (diff) | |
download | gdb-8e65ff28b0780a52bdbe067b6297a66f9ec4e16e.zip gdb-8e65ff28b0780a52bdbe067b6297a66f9ec4e16e.tar.gz gdb-8e65ff28b0780a52bdbe067b6297a66f9ec4e16e.tar.bz2 |
Add __FILE__ and __LINE__ parameter to internal_error() /
internal_verror().
Diffstat (limited to 'gdb/f-lang.c')
-rw-r--r-- | gdb/f-lang.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gdb/f-lang.c b/gdb/f-lang.c index c466c51..46c52ad 100644 --- a/gdb/f-lang.c +++ b/gdb/f-lang.c @@ -1,5 +1,5 @@ /* Fortran language support routines for GDB, the GNU debugger. - Copyright 1993, 1994, 1996, 2000 Free Software Foundation, Inc. + Copyright 1993, 1994, 1996, 2000, 2001 Free Software Foundation, Inc. Contributed by Motorola. Adapted from the C parser by Farooq Butt (fmbutt@engage.sps.mot.com). @@ -896,7 +896,8 @@ get_bf_for_fcn (long the_function) item at the head of the queue is the one you want) */ if (saved_bf_list == NULL) - internal_error ("cannot get .bf node off empty list"); + internal_error (__FILE__, __LINE__, + "cannot get .bf node off empty list"); if (current_head_bf_list != NULL) if (current_head_bf_list->symnum_fcn == the_function) |