From 39fb8e9e0f5c7cb813eaa19a5f7368cb2d425f3f Mon Sep 17 00:00:00 2001 From: Bob Rossi Date: Tue, 27 Sep 2005 22:39:04 +0000 Subject: 2005-09-27 Bob Rossi * gdb.mi/mi-disassemble.exp, gdb.mi/mi2-disassemble.exp: Remove .* from test. Escape the | in mi_gdb_test call. * gdb.mi/mi-basics.exp, gdb.mi/mi-cli.exp, gdb.mi/mi-disassemble.exp, gdb.mi/mi-pthreads.exp, gdb.mi/mi-stack.exp, gdb.mi/mi2-basics.exp, gdb.mi/mi2-cli.exp, gdb.mi/mi2-disassemble.exp, gdb.mi/mi2-pthreads.exp, gdb.mi/mi2-stack.exp: Add extra details to expected regex's in mi_gdb_test calls. * lib/mi-support.exp: Remove arbitrary .* from tests. (mi_gdb_test): Add string_regex variable. Add anchor to main -re. Fully anchor GDB/MI expected results in mi_gdb_test. * lib/gdb.exp (string_to_regexp): Escape the ] character. * gdb.base/sizeof.exp: Remove escape character. Correct test. --- gdb/testsuite/gdb.mi/mi2-basics.exp | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'gdb/testsuite/gdb.mi/mi2-basics.exp') diff --git a/gdb/testsuite/gdb.mi/mi2-basics.exp b/gdb/testsuite/gdb.mi/mi2-basics.exp index 0fd1c87..bde6e94 100644 --- a/gdb/testsuite/gdb.mi/mi2-basics.exp +++ b/gdb/testsuite/gdb.mi/mi2-basics.exp @@ -1,4 +1,4 @@ -# Copyright 1999, 2000, 2001, 2002, 2003, 2004 +# Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005 # Free Software Foundation, Inc. # This program is free software; you can redistribute it and/or modify @@ -139,7 +139,7 @@ proc test_breakpoints_deletion {} { # The all parameter is actually no parameter. mi_gdb_test "200-break-delete" \ - "\\\^done" \ + "200\\\^done" \ "break-delete (all) operation" mi_gdb_test "201-break-list" \ @@ -169,7 +169,7 @@ proc test_dir_specification {} { "environment-directory empty-string operation" mi_gdb_test "204-environment-directory -r" \ - "\\\^done,source-path=\"\\\$cdir.\\\$cwd\"" \ + "204\\\^done,source-path=\"\\\$cdir.\\\$cwd\"" \ "environment-directory operation" #exp_internal 0 @@ -187,11 +187,11 @@ proc test_cwd_specification {} { # -environment-pwd mi_gdb_test "205-environment-cd ${objdir}" \ - "\\\^done" \ + "205\\\^done" \ "environment-cd arg operation" mi_gdb_test "206-environment-pwd" \ - "\\\^done,cwd=\"${escapedobjdir}\"" \ + "206\\\^done,cwd=\"${escapedobjdir}\"" \ "environment-pwd operation" } @@ -222,7 +222,7 @@ proc test_path_specification {} { } mi_gdb_test "207-environment-path" \ - "\\\^done,path=\"$orig_path\"" \ + "207\\\^done,path=\"$orig_path\"" \ "environment-path no-args operation" mi_gdb_test "208-environment-path $srcdir $objdir" \ @@ -230,11 +230,11 @@ proc test_path_specification {} { "environment-path dir1 dir2 operation" mi_gdb_test "209-environment-path -r $objdir" \ - "\\\^done,path=\"$escapedobjdir.$orig_path\"" \ + "209\\\^done,path=\"$escapedobjdir.$orig_path\"" \ "environment-path -r dir operation" mi_gdb_test "210-environment-path -r" \ - "\\\^done,path=\"$orig_path\"" \ + "210\\\^done,path=\"$orig_path\"" \ "environment-path -r operation" } -- cgit v1.1