diff --git a/gdb/testsuite/gdb.mi/ChangeLog-mi b/gdb/testsuite/gdb.mi/ChangeLog-mi
index 21b430b9b4..287e37f134 100644
--- a/gdb/testsuite/gdb.mi/ChangeLog-mi
+++ b/gdb/testsuite/gdb.mi/ChangeLog-mi
@@ -1,5 +1,7 @@
 2000-03-06  Elena Zannoni  <ezannoni@kwikemart.cygnus.com>
 
+	* mi-basics.exp: Comment out test for a still unimplemented operation.
+
 	* mi-disassemble.exp: Rewrite most of the tests to conform to new
  	disassemble interface.
 
diff --git a/gdb/testsuite/gdb.mi/mi-basics.exp b/gdb/testsuite/gdb.mi/mi-basics.exp
index acd905c295..15448ba557 100644
--- a/gdb/testsuite/gdb.mi/mi-basics.exp
+++ b/gdb/testsuite/gdb.mi/mi-basics.exp
@@ -108,9 +108,9 @@ proc test_exec_and_symbol_mi_operatons {} {
     # -file-symbol-file
 
     # FIXME: file-clear is not implemented yet.
-    mi_gdb_test "-file-clear" \
-             "\\\^done" \
-             "file-clear operation"
+#   mi_gdb_test "-file-clear" \
+#            "\\\^done" \
+#            "file-clear operation"
 
     mi_gdb_test "-file-exec-file ${binfile}" \
              "\\\^done" \