Use "::" as separator for Fortran in cooked index

This teaches cooked_index_entry::full_name that "::" is the separator
for Fortran.  I don't know enough Fortran to write a test case for
this.  However, a different series I am working on has a regression if
this patch is not applied.

Approved-By: Simon Marchi <simon.marchi@efficios.com>

diff --git a/gdb/dwarf2/cooked-index.c b/gdb/dwarf2/cooked-index.c
index 21d9dab5f41420f33d3966107e62e038789bb3b4..bbe14adcd56e41ad52b15a1104d739c031c41a97 100644 (file)
--- a/gdb/dwarf2/cooked-index.c
+++ b/gdb/dwarf2/cooked-index.c
@@ -234,6 +234,7 @@ cooked_index_entry::full_name (struct obstack *storage, bool for_main,
     {
     case language_cplus:
     case language_rust:
+    case language_fortran:
       sep = "::";
       break;