[gdb/testsuite] Fix gdb.guile/scm-cmd.exp without readline

Fix test-case gdb.guile/scm-cmd.exp using readline_is_used.

Tested on x86_64-linux.

diff --git a/gdb/testsuite/gdb.guile/scm-cmd.exp b/gdb/testsuite/gdb.guile/scm-cmd.exp
index a7fb59b00897148964ed59a5d1539765b5e01477..25a9780a4d5fb5fa87620efbf36eee032428b6b2 100644 (file)
--- a/gdb/testsuite/gdb.guile/scm-cmd.exp
+++ b/gdb/testsuite/gdb.guile/scm-cmd.exp
@@ -149,14 +149,17 @@ gdb_test "complete expr-test bar\." \
     "expr-test bar\.bc.*expr-test bar\.ij.*" \
     "test completion through complete command"
 
-set test "complete 'expr-test bar.i'"
-send_gdb "expr-test bar\.i\t\t"
-gdb_test_multiple "" "$test" {
-    -re "expr-test bar\.ij \\\x07$" {
-       send_gdb "\n"
-       gdb_test_multiple "" $test {
-           -re "invoked on = bar.ij.*$gdb_prompt $" {
-               pass "$test"
+
+if { [readline_is_used] } {
+    set test "complete 'expr-test bar.i'"
+    send_gdb "expr-test bar\.i\t\t"
+    gdb_test_multiple "" "$test" {
+       -re "expr-test bar\.ij \\\x07$" {
+           send_gdb "\n"
+           gdb_test_multiple "" $test {
+               -re "invoked on = bar.ij.*$gdb_prompt $" {
+                   pass "$test"
+               }
            }
        }
     }