From: Joel Brobecker <brobecker@gnat.com>
Date: Tue, 12 Jan 2010 08:50:44 +0000 (+0000)
Subject: Delete dead function.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=02893727c56378bb9c723096a58fd6dfc6f0d02b;p=binutils-gdb.git

Delete dead function.

        * ada-lang.c (extract_string): Delete.  No longer used.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 54c9c4299c0..ff22a9061cf 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+2010-01-12  Joel Brobecker  <brobecker@adacore.com>
+
+	Delete dead function.
+	* ada-lang.c (extract_string): Delete.  No longer used.
+
 2010-01-12  Joel Brobecker  <brobecker@adacore.com>
 
 	Fix -Wunused warning in dec-thread.c.
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 317c8d3ed72..24def9589bf 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -65,8 +65,6 @@
 #define TRUNCATION_TOWARDS_ZERO ((-5 / 2) == -2)
 #endif
 
-static void extract_string (CORE_ADDR addr, char *buf);
-
 static void modify_general_field (struct type *, char *, LONGEST, int, int);
 
 static struct type *desc_base_type (struct type *);
@@ -359,25 +357,6 @@ ada_print_array_index (struct value *index_value, struct ui_file *stream,
   fprintf_filtered (stream, " => ");
 }
 
-/* Read the string located at ADDR from the inferior and store the
-   result into BUF.  */
-
-static void
-extract_string (CORE_ADDR addr, char *buf)
-{
-  int char_index = 0;
-
-  /* Loop, reading one byte at a time, until we reach the '\000'
-     end-of-string marker.  */
-  do
-    {
-      target_read_memory (addr + char_index * sizeof (char),
-                          buf + char_index * sizeof (char), sizeof (char));
-      char_index++;
-    }
-  while (buf[char_index - 1] != '\000');
-}
-
 /* Assuming VECT points to an array of *SIZE objects of size
    ELEMENT_SIZE, grow it to contain at least MIN_SIZE objects,
    updating *SIZE as necessary and returning the (new) array.  */