* rs6000-tdep.c (rs6000_skip_prologue): Use skip_prologue_using_sal.

[deliverable/binutils-gdb.git] / gdb / dwarfread.c

diff --git a/gdb/dwarfread.c b/gdb/dwarfread.c
index 7afc93386227f7d606fd4fe771cbbd3ad122fdd0..b7000e563d6e6eb9e33eb31fadff8c0f24b72728 100644 (file)
--- a/gdb/dwarfread.c
+++ b/gdb/dwarfread.c
@@ -1,7 +1,7 @@
 /* DWARF debugging format support for GDB.
 
-   Copyright (C) 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
-   2000, 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
+   Copyright (C) 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000,
+   2001, 2002, 2003, 2004, 2007 Free Software Foundation, Inc.
 
    Written by Fred Fish at Cygnus Support.  Portions based on dbxread.c,
    mipsread.c, coffread.c, and dwarfread.c from a Data General SVR4 gdb port.
@@ -616,10 +616,12 @@ set_cu_language (struct dieinfo *dip)
     case LANG_FORTRAN90:
       cu_language = language_fortran;
       break;
+    case LANG_PASCAL83:
+      cu_language = language_pascal;
+      break;
     case LANG_ADA83:
     case LANG_COBOL74:
     case LANG_COBOL85:
-    case LANG_PASCAL83:
       /* We don't know anything special about these yet. */
       cu_language = language_unknown;
       break;