+ # The "print entry-values" option shouldn't affect the output of
+ # '-stack-list-locals'.
+ foreach entry_values { no only preferred if-needed both compact default } {
+ mi_gdb_test "-gdb-set print entry-values $entry_values" {\^done} ""
+
+ with_test_prefix "$entry_values" {
+ # Test MI command '-stack-list-locals'.
+ mi_gdb_test "-stack-list-locals --simple-values" \
+ ".*\\^done,locals=\\\[\{name=\"array\",type=\"unsigned char \\\[2\\\]\"\},\{name=\"i\",type=\"int\",value=\"<unavailable>\"\}\\\]" \
+ "-stack-list-locals --simple-values"
+ }
+ }
+
+ mi_gdb_test "-gdb-set print entry-values no" {\^done} \
+ "-gdb-set print entry-values no"
+