diff --git a/gdb/mi/ChangeLog b/gdb/mi/ChangeLog
index 8b2e3088360..5bf43f76898 100644
--- a/gdb/mi/ChangeLog
+++ b/gdb/mi/ChangeLog
@@ -1,3 +1,8 @@
+2001-07-07  Andrew Cagney  <ac131313@redhat.com>
+
+	* mi-main.c (mi_cmd_data_evaluate_expression): Replace value_ptr
+	with `struct value *'.
+
 2001-07-08  Kevin Buettner  <kevinb@redhat.com>
 
 	* mi-out.c (mi_table_header, mi_field_int, mi_field_skip)
diff --git a/gdb/mi/mi-main.c b/gdb/mi/mi-main.c
index 5187cb056c2..78b7f7c2efb 100644
--- a/gdb/mi/mi-main.c
+++ b/gdb/mi/mi-main.c
@@ -659,7 +659,7 @@ mi_cmd_data_evaluate_expression (char *command, char **argv, int argc)
 {
   struct expression *expr;
   struct cleanup *old_chain = NULL;
-  value_ptr val;
+  struct value *val;
   struct ui_stream *stb = NULL;
 
   stb = ui_out_stream_new (uiout);