diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 3aa06fa72c9..4722846c75e 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2020-11-18  Simon Marchi  <simon.marchi@polymtl.ca>
+
+	* lib/mi-support.exp (mi_run_cmd_full): Use unresovled instead
+	of perror.
+
 2020-11-18  Joseph Myers  <joseph@codesourcery.com>
 
 	* lib/mi-support.exp (mi_gdb_file_cmd): Check for case where
diff --git a/gdb/testsuite/lib/mi-support.exp b/gdb/testsuite/lib/mi-support.exp
index bfc8edcd8d3..1c95ddee941 100644
--- a/gdb/testsuite/lib/mi-support.exp
+++ b/gdb/testsuite/lib/mi-support.exp
@@ -961,7 +961,7 @@ proc mi_run_cmd_full {use_mi_command args} {
 	gdb_expect 30 {
 	    -re "$mi_gdb_prompt$" { }
 	    default {
-		perror "gdb_init_command for target failed"
+		unresolved "gdb_init_command for target failed"
 		return -1
 	    }
 	}
@@ -995,7 +995,7 @@ proc mi_run_cmd_full {use_mi_command args} {
 	gdb_expect {
 	    -re "&\"jump \\*${start}\\\\n\"\[\r\n\]+~\"Continuing at 0x\[0-9A-Fa-f\]+\.\\\\n\"\[\r\n\]+\\^running\[\r\n\]+\\*running,thread-id=\"\[^\"\]+\"\[\r\n\]+${mi_gdb_prompt}" {}
 	    timeout {
-		perror "Unable to start target"
+		unresolved "unable to start target"
 		return -1
 	    }
 	}
@@ -1011,7 +1011,7 @@ proc mi_run_cmd_full {use_mi_command args} {
 	    return -1
 	}
 	timeout {
-	    perror "Unable to start target"
+	    unresolved "unable to start target"
 	    return -1
 	}
     }