From 51b8d20cf46627f9e97b90ada6467e69eb6d4439 Mon Sep 17 00:00:00 2001 From: Doug Evans Date: Sat, 22 Mar 2014 02:57:08 -0400 Subject: [PATCH] * gdb.guile/guile.exp (guile not supported): Verify multi-line guile command issues an error. --- gdb/testsuite/ChangeLog | 2 ++ gdb/testsuite/gdb.guile/guile.exp | 7 +++++++ 2 files changed, 9 insertions(+) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index f1f06799e9d..3a77ffd041e 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -2,6 +2,8 @@ * gdb.python/python.exp (python not supported): Verify multi-line python command issues an error. + * gdb.python/guile.exp (guile not supported): Verify multi-line + guile command issues an error. 2014-03-21 Maciej W. Rozycki diff --git a/gdb/testsuite/gdb.guile/guile.exp b/gdb/testsuite/gdb.guile/guile.exp index 2a171fefe61..f300d72b890 100644 --- a/gdb/testsuite/gdb.guile/guile.exp +++ b/gdb/testsuite/gdb.guile/guile.exp @@ -38,6 +38,13 @@ gdb_test_multiple "guile (display 23) (newline)" "verify guile support" { gdb_test "source $srcdir/$subdir/source2.scm" \ "Error in sourced command file:.*" \ "source source2.scm when guile disabled" + + # Verify multi-line guile commands cause an error. + gdb_test_multiline "multi-line guile command" \ + "guile" "" \ + "(print 23)" "" \ + "end" "not supported.*" + return } -re "$gdb_prompt $" {} -- 2.30.2