Index: dwarf2read.c
===================================================================
RCS file: /cvs/src/src/gdb/dwarf2read.c,v
retrieving revision 1.88
diff -c -3 -p -r1.88 dwarf2read.c
*** dwarf2read.c	25 Feb 2003 21:36:17 -0000	1.88
--- dwarf2read.c	12 Mar 2003 01:43:27 -0000
*************** set_cu_language (unsigned int lang)
*** 4455,4461 ****
      case DW_LANG_Pascal83:
      case DW_LANG_Modula2:
      default:
!       cu_language = language_unknown;
        break;
      }
    cu_language_defn = language_def (cu_language);
--- 4455,4462 ----
      case DW_LANG_Pascal83:
      case DW_LANG_Modula2:
      default:
!       /* These languages are unsupported, so we treat them as C.  */
!       cu_language = language_c;
        break;
      }
    cu_language_defn = language_def (cu_language);