aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.pascal
diff options
context:
space:
mode:
authorPedro Alves <palves@redhat.com>2012-01-16 16:21:53 +0000
committerPedro Alves <palves@redhat.com>2012-01-16 16:21:53 +0000
commit97ccebe869a69550b5a89a59b99955fb783f2b81 (patch)
treeb6780c16d8bbdde33d189466aa17d37c699ce4a1 /gdb/testsuite/gdb.pascal
parentddb1377cc0daa352458911e38a536c9ce33dec85 (diff)
downloadgdb-97ccebe869a69550b5a89a59b99955fb783f2b81.zip
gdb-97ccebe869a69550b5a89a59b99955fb783f2b81.tar.gz
gdb-97ccebe869a69550b5a89a59b99955fb783f2b81.tar.bz2
2012-01-16 Pedro Alves <palves@redhat.com>
Remove all calls to strace.
Diffstat (limited to 'gdb/testsuite/gdb.pascal')
-rw-r--r--gdb/testsuite/gdb.pascal/floats.exp4
-rw-r--r--gdb/testsuite/gdb.pascal/gdb11492.exp4
-rw-r--r--gdb/testsuite/gdb.pascal/hello.exp4
-rw-r--r--gdb/testsuite/gdb.pascal/integers.exp4
-rw-r--r--gdb/testsuite/gdb.pascal/print.exp4
-rw-r--r--gdb/testsuite/gdb.pascal/types.exp4
6 files changed, 0 insertions, 24 deletions
diff --git a/gdb/testsuite/gdb.pascal/floats.exp b/gdb/testsuite/gdb.pascal/floats.exp
index 6668666..e7122e7 100644
--- a/gdb/testsuite/gdb.pascal/floats.exp
+++ b/gdb/testsuite/gdb.pascal/floats.exp
@@ -13,10 +13,6 @@
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "pascal.exp"
set testfile "floats"
diff --git a/gdb/testsuite/gdb.pascal/gdb11492.exp b/gdb/testsuite/gdb.pascal/gdb11492.exp
index 0d03522..48f7b47 100644
--- a/gdb/testsuite/gdb.pascal/gdb11492.exp
+++ b/gdb/testsuite/gdb.pascal/gdb11492.exp
@@ -13,10 +13,6 @@
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "pascal.exp"
set testfile "gdb11492"
diff --git a/gdb/testsuite/gdb.pascal/hello.exp b/gdb/testsuite/gdb.pascal/hello.exp
index ce30919..0329acb 100644
--- a/gdb/testsuite/gdb.pascal/hello.exp
+++ b/gdb/testsuite/gdb.pascal/hello.exp
@@ -13,10 +13,6 @@
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "pascal.exp"
set testfile "hello"
diff --git a/gdb/testsuite/gdb.pascal/integers.exp b/gdb/testsuite/gdb.pascal/integers.exp
index 8cdc00c..68b978b 100644
--- a/gdb/testsuite/gdb.pascal/integers.exp
+++ b/gdb/testsuite/gdb.pascal/integers.exp
@@ -13,10 +13,6 @@
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "pascal.exp"
set testfile "integers"
diff --git a/gdb/testsuite/gdb.pascal/print.exp b/gdb/testsuite/gdb.pascal/print.exp
index ba6351b..c390a7c4 100644
--- a/gdb/testsuite/gdb.pascal/print.exp
+++ b/gdb/testsuite/gdb.pascal/print.exp
@@ -21,10 +21,6 @@
# Test printing of various values.
# NOTE: The tests here intentionally do not require a pascal compiler.
-if $tracelevel {
- strace $tracelevel
-}
-
load_lib "pascal.exp"
proc test_float_accepted {} {
diff --git a/gdb/testsuite/gdb.pascal/types.exp b/gdb/testsuite/gdb.pascal/types.exp
index f9f1736..a5db631 100644
--- a/gdb/testsuite/gdb.pascal/types.exp
+++ b/gdb/testsuite/gdb.pascal/types.exp
@@ -19,10 +19,6 @@
# (shebs@cygnus.com).
# Adapted to pascal by Pierre Muller
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "pascal.exp"
proc test_integer_literal_types_accepted {} {