diff --git a/binutils/ChangeLog b/binutils/ChangeLog
index e72be0b755..97139f9928 100644
--- a/binutils/ChangeLog
+++ b/binutils/ChangeLog
@@ -1,3 +1,8 @@
+2005-05-29  Richard Henderson  <rth@redhat.com>
+
+	* readelf.c (get_alpha_dynamic_type): New.
+	(get_dynamic_type): Call it.
+
 2005-05-24  H.J. Lu  <hongjiu.lu@intel.com>
 
 	* readelf.c (process_section_groups): Report group section
diff --git a/binutils/readelf.c b/binutils/readelf.c
index ab0243edb1..0523d5531e 100644
--- a/binutils/readelf.c
+++ b/binutils/readelf.c
@@ -1470,6 +1470,17 @@ get_ia64_dynamic_type (unsigned long type)
     }
 }
 
+static const char *
+get_alpha_dynamic_type (unsigned long type)
+{
+  switch (type)
+    {
+    case DT_ALPHA_PLTRO: return "ALPHA_PLTRO";
+    default:
+      return NULL;
+    }
+}
+
 static const char *
 get_dynamic_type (unsigned long type)
 {
@@ -1572,6 +1583,9 @@ get_dynamic_type (unsigned long type)
 	    case EM_IA_64:
 	      result = get_ia64_dynamic_type (type);
 	      break;
+	    case EM_ALPHA:
+	      result = get_alpha_dynamic_type (type);
+	      break;
 	    default:
 	      result = NULL;
 	      break;