Index: dwarf2read.c
===================================================================
RCS file: /cvs/src/src/gdb/dwarf2read.c,v
retrieving revision 1.90
diff -c -3 -p -r1.90 dwarf2read.c
*** dwarf2read.c	15 Apr 2003 23:07:11 -0000	1.90
--- dwarf2read.c	7 May 2003 01:23:14 -0000
*************** set_cu_language (unsigned int lang)
*** 4548,4554 ****
      case DW_LANG_Pascal83:
      case DW_LANG_Modula2:
      default:
!       cu_language = language_unknown;
        break;
      }
    cu_language_defn = language_def (cu_language);
--- 4548,4554 ----
      case DW_LANG_Pascal83:
      case DW_LANG_Modula2:
      default:
!       cu_language = language_unsupported;
        break;
      }
    cu_language_defn = language_def (cu_language);