Fix zero_ext documentation

[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.pascal / types.exp

diff --git a/gdb/testsuite/gdb.pascal/types.exp b/gdb/testsuite/gdb.pascal/types.exp
index bceae97a7b5d1a3c5dfb2c127dae46b02a751574..112c61255b999f5f52173af3f8d65f676843daad 100644 (file)
--- a/gdb/testsuite/gdb.pascal/types.exp
+++ b/gdb/testsuite/gdb.pascal/types.exp
@@ -1,5 +1,4 @@
-# Copyright 1994, 1995, 1997, 1998, 2007, 2008, 2009, 2010
-# Free Software Foundation, Inc.
+# Copyright 1994-2016 Free Software Foundation, Inc.
 # Copyright 2007 Free Software Foundation, Inc.
 #
 # This program is free software; you can redistribute it and/or modify
@@ -19,10 +18,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 {} {