projects
/
platform
/
upstream
/
binutils.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
ddb1377
)
2012-01-16 Pedro Alves <palves@redhat.com>
author
Pedro Alves
<palves@redhat.com>
Mon, 16 Jan 2012 16:21:53 +0000
(16:21 +0000)
committer
Pedro Alves
<palves@redhat.com>
Mon, 16 Jan 2012 16:21:53 +0000
(16:21 +0000)
Remove all calls to strace.
473 files changed:
gdb/testsuite/ChangeLog
patch
|
blob
|
history
gdb/testsuite/gdb.ada/array_bounds.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/array_return.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/array_subscript_addr.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/arrayidx.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/arrayparam.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/arrayptr.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/assign_1.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/atomic_enum.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/boolean_expr.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/call_pn.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/catch_ex.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/char_param.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/complete.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/cond_lang.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/dyn_loc.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/exec_changed.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/exprs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/fixed_cmp.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/fixed_points.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/formatted_ref.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/frame_args.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/fun_addr.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/fun_in_declare.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/funcall_param.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/homonym.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/int_deref.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/interface.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/lang_switch.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/mod_from_name.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/nested.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/null_array.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/null_record.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/packed_array.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/packed_tagged.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/print_chars.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/print_pc.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/ptype_arith_binop.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/ptype_field.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/ptype_tagged_param.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/rec_return.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/ref_param.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/ref_tick_size.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/start.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/str_ref_cmp.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/sym_print_name.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/taft_type.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/tagged.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/tasks.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/tick_last_segv.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/type_coercion.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/uninitialized_vars.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/variant_record_packed_array.exp
patch
|
blob
|
history
gdb/testsuite/gdb.ada/watch_arg.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/alpha-step.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/altivec-abi.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/altivec-regs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/amd64-byte.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/amd64-disp-step.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/amd64-dword.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/amd64-word.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/arm-disp-step.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/e500-abi.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/e500-prologue.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/e500-regs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/gdb1291.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/gdb1431.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/gdb1558.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/i386-avx.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/i386-bp_permanent.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/i386-byte.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/i386-disp-step.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/i386-gnu-cfi.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/i386-permbkpt.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/i386-prologue.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/i386-size-overlap.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/i386-size.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/i386-sse.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/i386-unwind.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/i386-word.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/pa-nullify.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/powerpc-d128-regs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/ppc-dfp.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/ppc-fp.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/ppc64-atomic-inst.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/system-gcore.exp
patch
|
blob
|
history
gdb/testsuite/gdb.arch/vsx-regs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.asm/asm-source.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/a2-run.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/advance.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/all-bin.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/annota1.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/annota3.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/args.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/arithmet.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/arrayidx.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/assign.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/async.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/attach.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/auxv.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/bang.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/bfp-test.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/bigcore.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/bitfields.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/bitfields2.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/bitops.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/break-on-linker-gcd-function.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/call-ar-st.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/call-rt-st.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/call-sc.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/call-signal-resume.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/call-strs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/callexit.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/callfuncs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/charset.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/checkpoint.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/chng-syms.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/code-expr.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/code_elim.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/commands.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/completion.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/complex.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/cond-expr.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/condbreak.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/consecutive.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/constvars.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/corefile.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/cursal.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/cvexpr.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/dbx.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/define.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/del.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/detach.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/dfp-exprs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/dfp-test.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/display.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/dump.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/echo.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/ena-dis-br.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/environ.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/eval-skip.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/exe-lock.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/expand-psymtabs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/exprs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/fileio.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/find.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/finish.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/fixsection.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/float.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/frame-args.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/funcargs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/gcore-buffer-overflow.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/gcore.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/gdb1056.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/gdb1090.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/gdb11530.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/gdb11531.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/gdb1250.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/gdb1555.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/gdbvars.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/gnu_vector.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/hashline1.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/hashline2.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/hashline3.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/huge.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/ifelse.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/info-proc.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/info-target.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/interp.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/interrupt.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/jit-so.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/jit.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/jump.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/label.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/langs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/lineinc.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/list.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/logical.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/long_long.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/longjmp.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/macscp.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/maint.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/memattr.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/mips_pro.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/miscexprs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/multi-forks.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/nodebug.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/nofield.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/opaque.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/overlays.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/page.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/pc-fp.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/pending.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/pointers.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/pr11022.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/prelink.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/printcmds.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/psymtab.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/ptr-typedef.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/ptype.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/radix.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/readline.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/recurse.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/regs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/relational.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/relativedebug.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/relocate.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/remote.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/remotetimeout.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/reread.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/restore.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/return2.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/savedregs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/scope.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/sect-cmd.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/sep.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/sepdebug.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/sepsymtab.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/set-lang-auto.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/setshow.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/setvar.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/shlib-call.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/shreloc.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/sigall.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/sigaltstack.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/sigbpt.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/siginfo-addr.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/siginfo-obj.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/siginfo.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/signals.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/signull.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/sigrepeat.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/sigstep.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/sizeof.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/so-impl-ld.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/so-indr-cl.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/solib.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/source.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/stack-checking.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/start.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/step-break.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/step-bt.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/step-line.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/step-test.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/store.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/structs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/structs2.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/subst.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/term.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/testenv.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/trace-commands.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/twice.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/type-opaque.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/unload.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/until.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/unwindonsignal.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/varargs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/volatile.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/watch_thread_num.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/watchpoint-solib.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/watchpoint.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/watchpoints.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/whatis-exp.exp
patch
|
blob
|
history
gdb/testsuite/gdb.base/whatis.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/ambiguous.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/annota2.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/annota3.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/anon-union.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/arg-reference.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/bool.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/breakpoint.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/bs15503.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/call-c.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/casts.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/class2.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/classes.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/cpcompletion.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/cpexprs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/cplusfuncs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/ctti.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/demangle.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/derivation.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/exception.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/formatted-ref.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/gdb1355.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/gdb2384.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/gdb2495.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/hang.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/inherit.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/local.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/m-data.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/m-static.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/maint.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/mb-ctor.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/mb-inline.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/mb-templates.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/member-ptr.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/method.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/misc.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/namespace-nested-import.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/namespace.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/nextoverthrow.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/nsdecl.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/nsimport.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/nsrecurs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/nsstress.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/nsusing.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/overload.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/ovldbreak.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/pr-1023.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/pr-1210.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/pr-574.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/printmethod.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/psmang.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/punctuator.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/ref-params.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/ref-types.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/rtti.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/shadow.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/temargs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/templates.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/try_catch.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/userdef.exp
patch
|
blob
|
history
gdb/testsuite/gdb.cp/virtfunc.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/am33.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/h8300s.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/hppa.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/mn10300.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/sh3.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t01_mov.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t02_mova.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t03_add.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t04_sub.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t05_cmp.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t06_ari2.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t07_ari3.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t08_or.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t09_xor.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t10_and.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t11_logs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t12_bit.exp
patch
|
blob
|
history
gdb/testsuite/gdb.disasm/t13_otr.exp
patch
|
blob
|
history
gdb/testsuite/gdb.fortran/array-element.exp
patch
|
blob
|
history
gdb/testsuite/gdb.fortran/derived-type.exp
patch
|
blob
|
history
gdb/testsuite/gdb.fortran/exprs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.fortran/subarray.exp
patch
|
blob
|
history
gdb/testsuite/gdb.fortran/types.exp
patch
|
blob
|
history
gdb/testsuite/gdb.gdb/complaints.exp
patch
|
blob
|
history
gdb/testsuite/gdb.gdb/observer.exp
patch
|
blob
|
history
gdb/testsuite/gdb.gdb/selftest.exp
patch
|
blob
|
history
gdb/testsuite/gdb.gdb/xfullpath.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.aCC/optimize.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.base-hp/dollar.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.base-hp/reg-pa64.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.base-hp/reg.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.compat/xdb3.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp
patch
|
blob
|
history
gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp
patch
|
blob
|
history
gdb/testsuite/gdb.java/jmain.exp
patch
|
blob
|
history
gdb/testsuite/gdb.java/jmisc.exp
patch
|
blob
|
history
gdb/testsuite/gdb.java/jnpe.exp
patch
|
blob
|
history
gdb/testsuite/gdb.java/jprint.exp
patch
|
blob
|
history
gdb/testsuite/gdb.java/jv-exp.exp
patch
|
blob
|
history
gdb/testsuite/gdb.java/jv-print.exp
patch
|
blob
|
history
gdb/testsuite/gdb.mi/mi-pending.exp
patch
|
blob
|
history
gdb/testsuite/gdb.modula2/unbounded-array.exp
patch
|
blob
|
history
gdb/testsuite/gdb.objc/basicclass.exp
patch
|
blob
|
history
gdb/testsuite/gdb.objc/nondebug.exp
patch
|
blob
|
history
gdb/testsuite/gdb.objc/objcdecode.exp
patch
|
blob
|
history
gdb/testsuite/gdb.objc/print.exp
patch
|
blob
|
history
gdb/testsuite/gdb.opencl/callfuncs.exp
patch
|
blob
|
history
gdb/testsuite/gdb.opencl/convs_casts.exp
patch
|
blob
|
history
gdb/testsuite/gdb.opencl/datatypes.exp
patch
|
blob
|
history
gdb/testsuite/gdb.opencl/operators.exp
patch
|
blob
|
history
gdb/testsuite/gdb.opencl/vec_comps.exp
patch
|
blob
|
history
gdb/testsuite/gdb.opt/clobbered-registers-O2.exp
patch
|
blob
|
history
gdb/testsuite/gdb.pascal/floats.exp
patch
|
blob
|
history
gdb/testsuite/gdb.pascal/gdb11492.exp
patch
|
blob
|
history
gdb/testsuite/gdb.pascal/hello.exp
patch
|
blob
|
history
gdb/testsuite/gdb.pascal/integers.exp
patch
|
blob
|
history
gdb/testsuite/gdb.pascal/print.exp
patch
|
blob
|
history
gdb/testsuite/gdb.pascal/types.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/lib-types.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-block.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-breakpoint.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-cmd.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-events.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-evsignal.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-evthreads.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-finish-breakpoint.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-finish-breakpoint2.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-frame.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-function.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-inferior.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-infthread.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-objfile-script.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-objfile.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-parameter.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-pp-maint.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-prettyprint.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-progspace.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-prompt.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-section-script.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-symbol.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-symtab.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-template.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-type.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/py-value.exp
patch
|
blob
|
history
gdb/testsuite/gdb.python/python.exp
patch
|
blob
|
history
gdb/testsuite/gdb.reverse/i386-precsave.exp
patch
|
blob
|
history
gdb/testsuite/gdb.reverse/i386-reverse.exp
patch
|
blob
|
history
gdb/testsuite/gdb.reverse/i386-sse-reverse.exp
patch
|
blob
|
history
gdb/testsuite/gdb.reverse/i387-env-reverse.exp
patch
|
blob
|
history
gdb/testsuite/gdb.reverse/i387-stack-reverse.exp
patch
|
blob
|
history
gdb/testsuite/gdb.reverse/sigall-precsave.exp
patch
|
blob
|
history
gdb/testsuite/gdb.reverse/sigall-reverse.exp
patch
|
blob
|
history
gdb/testsuite/gdb.stabs/exclfwd.exp
patch
|
blob
|
history
gdb/testsuite/gdb.stabs/gdb11479.exp
patch
|
blob
|
history
gdb/testsuite/gdb.stabs/weird.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/bp_in_thread.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/gcore-thread.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/hand-call-in-threads.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/interrupted-hand-call.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/killed.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/linux-dp.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/manythreads.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/print-threads.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/pthread_cond_wait.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/pthreads.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/schedlock.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/staticthreads.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/step.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/step2.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/switch-threads.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/thread-find.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/thread-specific.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/thread-unwindonsignal.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/thread_check.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/thread_events.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/threadapply.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/tls-shared.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/watchthreads.exp
patch
|
blob
|
history
gdb/testsuite/gdb.threads/watchthreads2.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/actions.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/ax.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/backtrace.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/change-loc.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/circ.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/collection.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/deltrace.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/infotrace.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/packetlen.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/passc-dyn.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/passcount.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/pending.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/report.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/save-trace.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/strace.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/tfile.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/tfind.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/tracecmd.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/tsv.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/while-dyn.exp
patch
|
blob
|
history
gdb/testsuite/gdb.trace/while-stepping.exp
patch
|
blob
|
history
diff --git
a/gdb/testsuite/ChangeLog
b/gdb/testsuite/ChangeLog
index
9adc987
..
6350650
100644
(file)
--- a/
gdb/testsuite/ChangeLog
+++ b/
gdb/testsuite/ChangeLog
@@
-1,3
+1,7
@@
+2012-01-16 Pedro Alves <palves@redhat.com>
+
+ Remove all calls to strace.
+
2012-01-14 Jan Kratochvil <jan.kratochvil@redhat.com>
* gdb.dwarf2/dw2-namespaceless-anonymous.S: New file.
2012-01-14 Jan Kratochvil <jan.kratochvil@redhat.com>
* gdb.dwarf2/dw2-namespaceless-anonymous.S: New file.
diff --git
a/gdb/testsuite/gdb.ada/array_bounds.exp
b/gdb/testsuite/gdb.ada/array_bounds.exp
index
b47ef3a
..
a726e71
100644
(file)
--- a/
gdb/testsuite/gdb.ada/array_bounds.exp
+++ b/
gdb/testsuite/gdb.ada/array_bounds.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/>.
# 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 "ada.exp"
set testdir "array_bounds"
load_lib "ada.exp"
set testdir "array_bounds"
diff --git
a/gdb/testsuite/gdb.ada/array_return.exp
b/gdb/testsuite/gdb.ada/array_return.exp
index
f5f1d68
..
c72f8cf
100644
(file)
--- a/
gdb/testsuite/gdb.ada/array_return.exp
+++ b/
gdb/testsuite/gdb.ada/array_return.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/>.
# 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 "ada.exp"
if { [skip_ada_tests] } { return -1 }
load_lib "ada.exp"
if { [skip_ada_tests] } { return -1 }
diff --git
a/gdb/testsuite/gdb.ada/array_subscript_addr.exp
b/gdb/testsuite/gdb.ada/array_subscript_addr.exp
index
cfad5a0
..
aa10b27
100644
(file)
--- a/
gdb/testsuite/gdb.ada/array_subscript_addr.exp
+++ b/
gdb/testsuite/gdb.ada/array_subscript_addr.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/>.
# 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 "ada.exp"
set testdir "array_subscript_addr"
load_lib "ada.exp"
set testdir "array_subscript_addr"
diff --git
a/gdb/testsuite/gdb.ada/arrayidx.exp
b/gdb/testsuite/gdb.ada/arrayidx.exp
index
0373cc3
..
f8c087d
100644
(file)
--- a/
gdb/testsuite/gdb.ada/arrayidx.exp
+++ b/
gdb/testsuite/gdb.ada/arrayidx.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/>.
# 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 "ada.exp"
if { [skip_ada_tests] } { return -1 }
load_lib "ada.exp"
if { [skip_ada_tests] } { return -1 }
diff --git
a/gdb/testsuite/gdb.ada/arrayparam.exp
b/gdb/testsuite/gdb.ada/arrayparam.exp
index
5c6ae00
..
d1549df
100644
(file)
--- a/
gdb/testsuite/gdb.ada/arrayparam.exp
+++ b/
gdb/testsuite/gdb.ada/arrayparam.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/>.
# 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 "ada.exp"
set testdir "arrayparam"
load_lib "ada.exp"
set testdir "arrayparam"
diff --git
a/gdb/testsuite/gdb.ada/arrayptr.exp
b/gdb/testsuite/gdb.ada/arrayptr.exp
index
d80ee8e
..
192feb1
100644
(file)
--- a/
gdb/testsuite/gdb.ada/arrayptr.exp
+++ b/
gdb/testsuite/gdb.ada/arrayptr.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/>.
# 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 "ada.exp"
set testdir "arrayptr"
load_lib "ada.exp"
set testdir "arrayptr"
diff --git
a/gdb/testsuite/gdb.ada/assign_1.exp
b/gdb/testsuite/gdb.ada/assign_1.exp
index
1aa49e8
..
c27e6d0
100644
(file)
--- a/
gdb/testsuite/gdb.ada/assign_1.exp
+++ b/
gdb/testsuite/gdb.ada/assign_1.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/>.
# 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 "ada.exp"
gdb_exit
load_lib "ada.exp"
gdb_exit
diff --git
a/gdb/testsuite/gdb.ada/atomic_enum.exp
b/gdb/testsuite/gdb.ada/atomic_enum.exp
index
2acbfca
..
e0ac214
100644
(file)
--- a/
gdb/testsuite/gdb.ada/atomic_enum.exp
+++ b/
gdb/testsuite/gdb.ada/atomic_enum.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/>.
# 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 "ada.exp"
set testdir "atomic_enum"
load_lib "ada.exp"
set testdir "atomic_enum"
diff --git
a/gdb/testsuite/gdb.ada/boolean_expr.exp
b/gdb/testsuite/gdb.ada/boolean_expr.exp
index
e79c5c1
..
52a6823
100644
(file)
--- a/
gdb/testsuite/gdb.ada/boolean_expr.exp
+++ b/
gdb/testsuite/gdb.ada/boolean_expr.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/>.
# 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 "ada.exp"
gdb_exit
load_lib "ada.exp"
gdb_exit
diff --git
a/gdb/testsuite/gdb.ada/call_pn.exp
b/gdb/testsuite/gdb.ada/call_pn.exp
index
9243e86
..
1b99252
100644
(file)
--- a/
gdb/testsuite/gdb.ada/call_pn.exp
+++ b/
gdb/testsuite/gdb.ada/call_pn.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/>.
# 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 "ada.exp"
set testdir "call_pn"
load_lib "ada.exp"
set testdir "call_pn"
diff --git
a/gdb/testsuite/gdb.ada/catch_ex.exp
b/gdb/testsuite/gdb.ada/catch_ex.exp
index
0336903
..
f132355
100644
(file)
--- a/
gdb/testsuite/gdb.ada/catch_ex.exp
+++ b/
gdb/testsuite/gdb.ada/catch_ex.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/>.
# 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 "ada.exp"
set testdir "catch_ex"
load_lib "ada.exp"
set testdir "catch_ex"
diff --git
a/gdb/testsuite/gdb.ada/char_param.exp
b/gdb/testsuite/gdb.ada/char_param.exp
index
53ac32d
..
e437721
100644
(file)
--- a/
gdb/testsuite/gdb.ada/char_param.exp
+++ b/
gdb/testsuite/gdb.ada/char_param.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/>.
# 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 "ada.exp"
set testdir "char_param"
load_lib "ada.exp"
set testdir "char_param"
diff --git
a/gdb/testsuite/gdb.ada/complete.exp
b/gdb/testsuite/gdb.ada/complete.exp
index
1b65efa
..
4a0f2b4
100644
(file)
--- a/
gdb/testsuite/gdb.ada/complete.exp
+++ b/
gdb/testsuite/gdb.ada/complete.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/>.
# 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 "ada.exp"
set testdir "complete"
load_lib "ada.exp"
set testdir "complete"
diff --git
a/gdb/testsuite/gdb.ada/cond_lang.exp
b/gdb/testsuite/gdb.ada/cond_lang.exp
index
6f5f1e8
..
b2aed95
100644
(file)
--- a/
gdb/testsuite/gdb.ada/cond_lang.exp
+++ b/
gdb/testsuite/gdb.ada/cond_lang.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/>.
# 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 "ada.exp"
set testdir "cond_lang"
load_lib "ada.exp"
set testdir "cond_lang"
diff --git
a/gdb/testsuite/gdb.ada/dyn_loc.exp
b/gdb/testsuite/gdb.ada/dyn_loc.exp
index
bc40dad
..
1f7b9c2
100644
(file)
--- a/
gdb/testsuite/gdb.ada/dyn_loc.exp
+++ b/
gdb/testsuite/gdb.ada/dyn_loc.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/>.
# 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 "ada.exp"
set testdir "dyn_loc"
load_lib "ada.exp"
set testdir "dyn_loc"
diff --git
a/gdb/testsuite/gdb.ada/exec_changed.exp
b/gdb/testsuite/gdb.ada/exec_changed.exp
index
7597877
..
4a3792b
100644
(file)
--- a/
gdb/testsuite/gdb.ada/exec_changed.exp
+++ b/
gdb/testsuite/gdb.ada/exec_changed.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/>.
# 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 "ada.exp"
if { [skip_ada_tests] } { return -1 }
load_lib "ada.exp"
if { [skip_ada_tests] } { return -1 }
diff --git
a/gdb/testsuite/gdb.ada/exprs.exp
b/gdb/testsuite/gdb.ada/exprs.exp
index
ef9a56b
..
764cd57
100644
(file)
--- a/
gdb/testsuite/gdb.ada/exprs.exp
+++ b/
gdb/testsuite/gdb.ada/exprs.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/>.
# 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 "ada.exp"
set testdir "exprs"
load_lib "ada.exp"
set testdir "exprs"
diff --git
a/gdb/testsuite/gdb.ada/fixed_cmp.exp
b/gdb/testsuite/gdb.ada/fixed_cmp.exp
index
2c85526
..
1d0f960
100644
(file)
--- a/
gdb/testsuite/gdb.ada/fixed_cmp.exp
+++ b/
gdb/testsuite/gdb.ada/fixed_cmp.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/>.
# 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 "ada.exp"
set testdir "fixed_cmp"
load_lib "ada.exp"
set testdir "fixed_cmp"
diff --git
a/gdb/testsuite/gdb.ada/fixed_points.exp
b/gdb/testsuite/gdb.ada/fixed_points.exp
index
e5bf2e1
..
d86a00b
100644
(file)
--- a/
gdb/testsuite/gdb.ada/fixed_points.exp
+++ b/
gdb/testsuite/gdb.ada/fixed_points.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/>.
# 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 "ada.exp"
if { [skip_ada_tests] } { return -1 }
load_lib "ada.exp"
if { [skip_ada_tests] } { return -1 }
diff --git
a/gdb/testsuite/gdb.ada/formatted_ref.exp
b/gdb/testsuite/gdb.ada/formatted_ref.exp
index
a7ad067
..
8341dca
100644
(file)
--- a/
gdb/testsuite/gdb.ada/formatted_ref.exp
+++ b/
gdb/testsuite/gdb.ada/formatted_ref.exp
@@
-24,10
+24,6
@@
# work properly: condition expression using a reference object as one of its
# operand.
# work properly: condition expression using a reference object as one of its
# operand.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "ada.exp"
set testdir "formatted_ref"
load_lib "ada.exp"
set testdir "formatted_ref"
diff --git
a/gdb/testsuite/gdb.ada/frame_args.exp
b/gdb/testsuite/gdb.ada/frame_args.exp
index
c83f63a
..
98c1a44
100644
(file)
--- a/
gdb/testsuite/gdb.ada/frame_args.exp
+++ b/
gdb/testsuite/gdb.ada/frame_args.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/>.
# 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 "ada.exp"
set testdir "frame_args"
load_lib "ada.exp"
set testdir "frame_args"
diff --git
a/gdb/testsuite/gdb.ada/fun_addr.exp
b/gdb/testsuite/gdb.ada/fun_addr.exp
index
1c76a1e
..
6dabf34
100644
(file)
--- a/
gdb/testsuite/gdb.ada/fun_addr.exp
+++ b/
gdb/testsuite/gdb.ada/fun_addr.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/>.
# 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 "ada.exp"
set testdir "fun_addr"
load_lib "ada.exp"
set testdir "fun_addr"
diff --git
a/gdb/testsuite/gdb.ada/fun_in_declare.exp
b/gdb/testsuite/gdb.ada/fun_in_declare.exp
index
09f15bc
..
b73c74a
100644
(file)
--- a/
gdb/testsuite/gdb.ada/fun_in_declare.exp
+++ b/
gdb/testsuite/gdb.ada/fun_in_declare.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/>.
# 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 "ada.exp"
set testdir "fun_in_declare"
load_lib "ada.exp"
set testdir "fun_in_declare"
diff --git
a/gdb/testsuite/gdb.ada/funcall_param.exp
b/gdb/testsuite/gdb.ada/funcall_param.exp
index
8321eb6
..
ac0da83
100644
(file)
--- a/
gdb/testsuite/gdb.ada/funcall_param.exp
+++ b/
gdb/testsuite/gdb.ada/funcall_param.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/>.
# 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 "ada.exp"
set testdir "funcall_param"
load_lib "ada.exp"
set testdir "funcall_param"
diff --git
a/gdb/testsuite/gdb.ada/homonym.exp
b/gdb/testsuite/gdb.ada/homonym.exp
index
d535ca2
..
a81135a
100644
(file)
--- a/
gdb/testsuite/gdb.ada/homonym.exp
+++ b/
gdb/testsuite/gdb.ada/homonym.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/>.
# 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 "ada.exp"
set testdir "homonym"
load_lib "ada.exp"
set testdir "homonym"
diff --git
a/gdb/testsuite/gdb.ada/int_deref.exp
b/gdb/testsuite/gdb.ada/int_deref.exp
index
d8d2f20
..
51705bc
100644
(file)
--- a/
gdb/testsuite/gdb.ada/int_deref.exp
+++ b/
gdb/testsuite/gdb.ada/int_deref.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/>.
# 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 "ada.exp"
set testdir "int_deref"
load_lib "ada.exp"
set testdir "int_deref"
diff --git
a/gdb/testsuite/gdb.ada/interface.exp
b/gdb/testsuite/gdb.ada/interface.exp
index
fd34838
..
ae21a53
100644
(file)
--- a/
gdb/testsuite/gdb.ada/interface.exp
+++ b/
gdb/testsuite/gdb.ada/interface.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/>.
# 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 "ada.exp"
set testdir "interface"
load_lib "ada.exp"
set testdir "interface"
diff --git
a/gdb/testsuite/gdb.ada/lang_switch.exp
b/gdb/testsuite/gdb.ada/lang_switch.exp
index
e3beec5
..
9e14687
100644
(file)
--- a/
gdb/testsuite/gdb.ada/lang_switch.exp
+++ b/
gdb/testsuite/gdb.ada/lang_switch.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/>.
# 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 "ada.exp"
set testdir "lang_switch"
load_lib "ada.exp"
set testdir "lang_switch"
diff --git
a/gdb/testsuite/gdb.ada/mod_from_name.exp
b/gdb/testsuite/gdb.ada/mod_from_name.exp
index
38a9bb9
..
fe97245
100644
(file)
--- a/
gdb/testsuite/gdb.ada/mod_from_name.exp
+++ b/
gdb/testsuite/gdb.ada/mod_from_name.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/>.
# 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 "ada.exp"
set testdir "mod_from_name"
load_lib "ada.exp"
set testdir "mod_from_name"
diff --git
a/gdb/testsuite/gdb.ada/nested.exp
b/gdb/testsuite/gdb.ada/nested.exp
index
be8dece
..
079577b
100644
(file)
--- a/
gdb/testsuite/gdb.ada/nested.exp
+++ b/
gdb/testsuite/gdb.ada/nested.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/>.
# 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 "ada.exp"
set testdir "nested"
load_lib "ada.exp"
set testdir "nested"
diff --git
a/gdb/testsuite/gdb.ada/null_array.exp
b/gdb/testsuite/gdb.ada/null_array.exp
index
d449e3c
..
4de3a26
100644
(file)
--- a/
gdb/testsuite/gdb.ada/null_array.exp
+++ b/
gdb/testsuite/gdb.ada/null_array.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/>.
# 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 "ada.exp"
set testdir "null_array"
load_lib "ada.exp"
set testdir "null_array"
diff --git
a/gdb/testsuite/gdb.ada/null_record.exp
b/gdb/testsuite/gdb.ada/null_record.exp
index
ab0ef3a
..
97508b2
100644
(file)
--- a/
gdb/testsuite/gdb.ada/null_record.exp
+++ b/
gdb/testsuite/gdb.ada/null_record.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/>.
# 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 "ada.exp"
if { [skip_ada_tests] } { return -1 }
load_lib "ada.exp"
if { [skip_ada_tests] } { return -1 }
diff --git
a/gdb/testsuite/gdb.ada/packed_array.exp
b/gdb/testsuite/gdb.ada/packed_array.exp
index
80dd44f
..
678639c
100644
(file)
--- a/
gdb/testsuite/gdb.ada/packed_array.exp
+++ b/
gdb/testsuite/gdb.ada/packed_array.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/>.
# 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 "ada.exp"
if { [skip_ada_tests] } { return -1 }
load_lib "ada.exp"
if { [skip_ada_tests] } { return -1 }
diff --git
a/gdb/testsuite/gdb.ada/packed_tagged.exp
b/gdb/testsuite/gdb.ada/packed_tagged.exp
index
e671d73
..
3cf8a28
100644
(file)
--- a/
gdb/testsuite/gdb.ada/packed_tagged.exp
+++ b/
gdb/testsuite/gdb.ada/packed_tagged.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/>.
# 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 "ada.exp"
set testdir "packed_tagged"
load_lib "ada.exp"
set testdir "packed_tagged"
diff --git
a/gdb/testsuite/gdb.ada/print_chars.exp
b/gdb/testsuite/gdb.ada/print_chars.exp
index
e51356c
..
35dfcc6
100644
(file)
--- a/
gdb/testsuite/gdb.ada/print_chars.exp
+++ b/
gdb/testsuite/gdb.ada/print_chars.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/>.
# 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 "ada.exp"
set testdir "print_chars"
load_lib "ada.exp"
set testdir "print_chars"
diff --git
a/gdb/testsuite/gdb.ada/print_pc.exp
b/gdb/testsuite/gdb.ada/print_pc.exp
index
aff00e8
..
371dd51
100644
(file)
--- a/
gdb/testsuite/gdb.ada/print_pc.exp
+++ b/
gdb/testsuite/gdb.ada/print_pc.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/>.
# 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 "ada.exp"
set testdir "start"
load_lib "ada.exp"
set testdir "start"
diff --git
a/gdb/testsuite/gdb.ada/ptype_arith_binop.exp
b/gdb/testsuite/gdb.ada/ptype_arith_binop.exp
index
944d90b
..
75d3812
100644
(file)
--- a/
gdb/testsuite/gdb.ada/ptype_arith_binop.exp
+++ b/
gdb/testsuite/gdb.ada/ptype_arith_binop.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/>.
# 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
-}
-
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
diff --git
a/gdb/testsuite/gdb.ada/ptype_field.exp
b/gdb/testsuite/gdb.ada/ptype_field.exp
index
2fb63e6
..
03f8d8f
100644
(file)
--- a/
gdb/testsuite/gdb.ada/ptype_field.exp
+++ b/
gdb/testsuite/gdb.ada/ptype_field.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/>.
# 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 "ada.exp"
set testdir "ptype_field"
load_lib "ada.exp"
set testdir "ptype_field"
diff --git
a/gdb/testsuite/gdb.ada/ptype_tagged_param.exp
b/gdb/testsuite/gdb.ada/ptype_tagged_param.exp
index
c56d82f
..
d710729
100644
(file)
--- a/
gdb/testsuite/gdb.ada/ptype_tagged_param.exp
+++ b/
gdb/testsuite/gdb.ada/ptype_tagged_param.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/>.
# 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 "ada.exp"
set testdir "ptype_tagged_param"
load_lib "ada.exp"
set testdir "ptype_tagged_param"
diff --git
a/gdb/testsuite/gdb.ada/rec_return.exp
b/gdb/testsuite/gdb.ada/rec_return.exp
index
e291d11
..
06fe4e6
100644
(file)
--- a/
gdb/testsuite/gdb.ada/rec_return.exp
+++ b/
gdb/testsuite/gdb.ada/rec_return.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/>.
# 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 "ada.exp"
set testdir "rec_return"
load_lib "ada.exp"
set testdir "rec_return"
diff --git
a/gdb/testsuite/gdb.ada/ref_param.exp
b/gdb/testsuite/gdb.ada/ref_param.exp
index
8f86083
..
82fcc61
100644
(file)
--- a/
gdb/testsuite/gdb.ada/ref_param.exp
+++ b/
gdb/testsuite/gdb.ada/ref_param.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/>.
# 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 "ada.exp"
set testdir "ref_param"
load_lib "ada.exp"
set testdir "ref_param"
diff --git
a/gdb/testsuite/gdb.ada/ref_tick_size.exp
b/gdb/testsuite/gdb.ada/ref_tick_size.exp
index
7d157ce
..
8036723
100644
(file)
--- a/
gdb/testsuite/gdb.ada/ref_tick_size.exp
+++ b/
gdb/testsuite/gdb.ada/ref_tick_size.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/>.
# 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 "ada.exp"
set testdir "ref_tick_size"
load_lib "ada.exp"
set testdir "ref_tick_size"
diff --git
a/gdb/testsuite/gdb.ada/start.exp
b/gdb/testsuite/gdb.ada/start.exp
index
c36db3f
..
6ba180d
100644
(file)
--- a/
gdb/testsuite/gdb.ada/start.exp
+++ b/
gdb/testsuite/gdb.ada/start.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/>.
# 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 "ada.exp"
if { [skip_ada_tests] } { return -1 }
load_lib "ada.exp"
if { [skip_ada_tests] } { return -1 }
diff --git
a/gdb/testsuite/gdb.ada/str_ref_cmp.exp
b/gdb/testsuite/gdb.ada/str_ref_cmp.exp
index
850be59
..
b0db6aa
100644
(file)
--- a/
gdb/testsuite/gdb.ada/str_ref_cmp.exp
+++ b/
gdb/testsuite/gdb.ada/str_ref_cmp.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/>.
# 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 "ada.exp"
set testdir "str_ref_cmp"
load_lib "ada.exp"
set testdir "str_ref_cmp"
diff --git
a/gdb/testsuite/gdb.ada/sym_print_name.exp
b/gdb/testsuite/gdb.ada/sym_print_name.exp
index
9e868a4
..
7a8765a
100644
(file)
--- a/
gdb/testsuite/gdb.ada/sym_print_name.exp
+++ b/
gdb/testsuite/gdb.ada/sym_print_name.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/>.
# 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 "ada.exp"
set testdir "sym_print_name"
load_lib "ada.exp"
set testdir "sym_print_name"
diff --git
a/gdb/testsuite/gdb.ada/taft_type.exp
b/gdb/testsuite/gdb.ada/taft_type.exp
index
8102c1e
..
b934ccc
100644
(file)
--- a/
gdb/testsuite/gdb.ada/taft_type.exp
+++ b/
gdb/testsuite/gdb.ada/taft_type.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/>.
# 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 "ada.exp"
set testdir "taft_type"
load_lib "ada.exp"
set testdir "taft_type"
diff --git
a/gdb/testsuite/gdb.ada/tagged.exp
b/gdb/testsuite/gdb.ada/tagged.exp
index
780667d
..
6cc316e
100644
(file)
--- a/
gdb/testsuite/gdb.ada/tagged.exp
+++ b/
gdb/testsuite/gdb.ada/tagged.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/>.
# 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 "ada.exp"
set testdir "tagged"
load_lib "ada.exp"
set testdir "tagged"
diff --git
a/gdb/testsuite/gdb.ada/tasks.exp
b/gdb/testsuite/gdb.ada/tasks.exp
index
59b6396
..
46a77ff
100644
(file)
--- a/
gdb/testsuite/gdb.ada/tasks.exp
+++ b/
gdb/testsuite/gdb.ada/tasks.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/>.
# 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 "ada.exp"
set testdir "tasks"
load_lib "ada.exp"
set testdir "tasks"
diff --git
a/gdb/testsuite/gdb.ada/tick_last_segv.exp
b/gdb/testsuite/gdb.ada/tick_last_segv.exp
index
3d1f07c
..
ce6782f
100644
(file)
--- a/
gdb/testsuite/gdb.ada/tick_last_segv.exp
+++ b/
gdb/testsuite/gdb.ada/tick_last_segv.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/>.
# 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 "ada.exp"
set testdir "tick_last_segv"
load_lib "ada.exp"
set testdir "tick_last_segv"
diff --git
a/gdb/testsuite/gdb.ada/type_coercion.exp
b/gdb/testsuite/gdb.ada/type_coercion.exp
index
3e57d8b
..
32b4136
100644
(file)
--- a/
gdb/testsuite/gdb.ada/type_coercion.exp
+++ b/
gdb/testsuite/gdb.ada/type_coercion.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/>.
# 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 "ada.exp"
set testdir "type_coercion"
load_lib "ada.exp"
set testdir "type_coercion"
diff --git
a/gdb/testsuite/gdb.ada/uninitialized_vars.exp
b/gdb/testsuite/gdb.ada/uninitialized_vars.exp
index
54a1805
..
0ce240e
100644
(file)
--- a/
gdb/testsuite/gdb.ada/uninitialized_vars.exp
+++ b/
gdb/testsuite/gdb.ada/uninitialized_vars.exp
@@
-16,10
+16,6
@@
# Check that GDB is able to print unconstrained variables and discriminated
# records before their initialization.
# Check that GDB is able to print unconstrained variables and discriminated
# records before their initialization.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "ada.exp"
set testdir "uninitialized_vars"
load_lib "ada.exp"
set testdir "uninitialized_vars"
diff --git
a/gdb/testsuite/gdb.ada/variant_record_packed_array.exp
b/gdb/testsuite/gdb.ada/variant_record_packed_array.exp
index
2e5f93d
..
34bd3de
100644
(file)
--- a/
gdb/testsuite/gdb.ada/variant_record_packed_array.exp
+++ b/
gdb/testsuite/gdb.ada/variant_record_packed_array.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/>.
# 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 "ada.exp"
set testdir "variant_record_packed_array"
load_lib "ada.exp"
set testdir "variant_record_packed_array"
diff --git
a/gdb/testsuite/gdb.ada/watch_arg.exp
b/gdb/testsuite/gdb.ada/watch_arg.exp
index
7961117
..
1cb9eca
100644
(file)
--- a/
gdb/testsuite/gdb.ada/watch_arg.exp
+++ b/
gdb/testsuite/gdb.ada/watch_arg.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/>.
# 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 "ada.exp"
if { [skip_ada_tests] } { return -1 }
load_lib "ada.exp"
if { [skip_ada_tests] } { return -1 }
diff --git
a/gdb/testsuite/gdb.arch/alpha-step.exp
b/gdb/testsuite/gdb.arch/alpha-step.exp
index
53631ef
..
3008b11
100644
(file)
--- a/
gdb/testsuite/gdb.arch/alpha-step.exp
+++ b/
gdb/testsuite/gdb.arch/alpha-step.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/>.
# 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 {
- strace $tracelevel
-}
-
if ![istarget "alpha*-*-*"] then {
verbose "Skipping alpha step tests."
if ![istarget "alpha*-*-*"] then {
verbose "Skipping alpha step tests."
diff --git
a/gdb/testsuite/gdb.arch/altivec-abi.exp
b/gdb/testsuite/gdb.arch/altivec-abi.exp
index
994b23c
..
9bbe33f
100644
(file)
--- a/
gdb/testsuite/gdb.arch/altivec-abi.exp
+++ b/
gdb/testsuite/gdb.arch/altivec-abi.exp
@@
-18,10
+18,6
@@
# Tests for Powerpc AltiVec ABI
# Tests for Powerpc AltiVec ABI
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# This file uses altivec-abi.c for input.
#
#
# This file uses altivec-abi.c for input.
#
diff --git
a/gdb/testsuite/gdb.arch/altivec-regs.exp
b/gdb/testsuite/gdb.arch/altivec-regs.exp
index
53cba8e
..
6ed6107
100644
(file)
--- a/
gdb/testsuite/gdb.arch/altivec-regs.exp
+++ b/
gdb/testsuite/gdb.arch/altivec-regs.exp
@@
-17,10
+17,6
@@
# Tests for Powerpc AltiVec register setting and fetching
# Tests for Powerpc AltiVec register setting and fetching
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# Test the use of registers, especially AltiVec registers, for Powerpc.
# This file uses altivec-regs.c for input.
#
# Test the use of registers, especially AltiVec registers, for Powerpc.
# This file uses altivec-regs.c for input.
diff --git
a/gdb/testsuite/gdb.arch/amd64-byte.exp
b/gdb/testsuite/gdb.arch/amd64-byte.exp
index
c966f63
..
87f6332
100644
(file)
--- a/
gdb/testsuite/gdb.arch/amd64-byte.exp
+++ b/
gdb/testsuite/gdb.arch/amd64-byte.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
if { ![istarget x86_64-*-* ] || ![is_lp64_target] } {
verbose "Skipping amd64 byte register tests."
if { ![istarget x86_64-*-* ] || ![is_lp64_target] } {
verbose "Skipping amd64 byte register tests."
diff --git
a/gdb/testsuite/gdb.arch/amd64-disp-step.exp
b/gdb/testsuite/gdb.arch/amd64-disp-step.exp
index
a890f35
..
e7bb167
100644
(file)
--- a/
gdb/testsuite/gdb.arch/amd64-disp-step.exp
+++ b/
gdb/testsuite/gdb.arch/amd64-disp-step.exp
@@
-17,10
+17,6
@@
# Test amd64 displaced stepping.
# Test amd64 displaced stepping.
-if $tracelevel {
- strace $tracelevel
-}
-
if { ![istarget x86_64-*-* ] || ![is_lp64_target] } {
verbose "Skipping x86_64 displaced stepping tests."
if { ![istarget x86_64-*-* ] || ![is_lp64_target] } {
verbose "Skipping x86_64 displaced stepping tests."
diff --git
a/gdb/testsuite/gdb.arch/amd64-dword.exp
b/gdb/testsuite/gdb.arch/amd64-dword.exp
index
d2ac584
..
ed42716
100644
(file)
--- a/
gdb/testsuite/gdb.arch/amd64-dword.exp
+++ b/
gdb/testsuite/gdb.arch/amd64-dword.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
if { ![istarget x86_64-*-* ] || ![is_lp64_target] } {
verbose "Skipping amd64 dword register tests."
if { ![istarget x86_64-*-* ] || ![is_lp64_target] } {
verbose "Skipping amd64 dword register tests."
diff --git
a/gdb/testsuite/gdb.arch/amd64-word.exp
b/gdb/testsuite/gdb.arch/amd64-word.exp
index
47d5ba0
..
4eaa421
100644
(file)
--- a/
gdb/testsuite/gdb.arch/amd64-word.exp
+++ b/
gdb/testsuite/gdb.arch/amd64-word.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
if { ![istarget x86_64-*-* ] || ![is_lp64_target] } {
verbose "Skipping amd64 word register tests."
if { ![istarget x86_64-*-* ] || ![is_lp64_target] } {
verbose "Skipping amd64 word register tests."
diff --git
a/gdb/testsuite/gdb.arch/arm-disp-step.exp
b/gdb/testsuite/gdb.arch/arm-disp-step.exp
index
5e04f05
..
d09885d
100644
(file)
--- a/
gdb/testsuite/gdb.arch/arm-disp-step.exp
+++ b/
gdb/testsuite/gdb.arch/arm-disp-step.exp
@@
-17,10
+17,6
@@
# Test arm displaced stepping.
# Test arm displaced stepping.
-if $tracelevel {
- strace $tracelevel
-}
-
if {![istarget "arm*-*-*"]} then {
verbose "Skipping arm displaced stepping tests."
return
if {![istarget "arm*-*-*"]} then {
verbose "Skipping arm displaced stepping tests."
return
diff --git
a/gdb/testsuite/gdb.arch/e500-abi.exp
b/gdb/testsuite/gdb.arch/e500-abi.exp
index
72f90af
..
d2b13ab
100644
(file)
--- a/
gdb/testsuite/gdb.arch/e500-abi.exp
+++ b/
gdb/testsuite/gdb.arch/e500-abi.exp
@@
-17,10
+17,6
@@
# Tests for Powerpc e500 ABI
# Tests for Powerpc e500 ABI
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# This file uses e500-abi.c for input.
#
#
# This file uses e500-abi.c for input.
#
diff --git
a/gdb/testsuite/gdb.arch/e500-prologue.exp
b/gdb/testsuite/gdb.arch/e500-prologue.exp
index
7210756
..
a5e673d
100644
(file)
--- a/
gdb/testsuite/gdb.arch/e500-prologue.exp
+++ b/
gdb/testsuite/gdb.arch/e500-prologue.exp
@@
-15,10
+15,6
@@
#
# This file is part of the gdb testsuite.
#
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
# Test PowerPC E500 prologue analyzer.
# Test PowerPC E500 prologue analyzer.
diff --git
a/gdb/testsuite/gdb.arch/e500-regs.exp
b/gdb/testsuite/gdb.arch/e500-regs.exp
index
5a0212d
..
02c085c
100644
(file)
--- a/
gdb/testsuite/gdb.arch/e500-regs.exp
+++ b/
gdb/testsuite/gdb.arch/e500-regs.exp
@@
-16,10
+16,6
@@
# Tests for Powerpc E500 register setting and fetching
# Tests for Powerpc E500 register setting and fetching
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# Test the use of registers, especially E500 registers, for Powerpc.
# This file uses e500-regs.c for input.
#
# Test the use of registers, especially E500 registers, for Powerpc.
# This file uses e500-regs.c for input.
diff --git
a/gdb/testsuite/gdb.arch/gdb1291.exp
b/gdb/testsuite/gdb.arch/gdb1291.exp
index
99a5b30
..
2142bfb
100644
(file)
--- a/
gdb/testsuite/gdb.arch/gdb1291.exp
+++ b/
gdb/testsuite/gdb.arch/gdb1291.exp
@@
-21,10
+21,6
@@
# Tests for PR:1291. Ensure that backtrace works properly for stack
# frames greater than 256 bytes.
# Tests for PR:1291. Ensure that backtrace works properly for stack
# frames greater than 256 bytes.
-if $tracelevel {
- strace $tracelevel
-}
-
# Test SH backtraces with >256 byte frame stack. (PR:1291)
# Test SH backtraces with >256 byte frame stack. (PR:1291)
diff --git
a/gdb/testsuite/gdb.arch/gdb1431.exp
b/gdb/testsuite/gdb.arch/gdb1431.exp
index
4fa41b5
..
7446cce
100644
(file)
--- a/
gdb/testsuite/gdb.arch/gdb1431.exp
+++ b/
gdb/testsuite/gdb.arch/gdb1431.exp
@@
-23,10
+23,6
@@
# command, which actually is behaving as currently defined. What apparently
# was expected was the behavior of the newer "advance" command.
# command, which actually is behaving as currently defined. What apparently
# was expected was the behavior of the newer "advance" command.
-if $tracelevel {
- strace $tracelevel
-}
-
# Observe that the until command doesn't go all the way to sub2.
# Observe that the until command doesn't go all the way to sub2.
diff --git
a/gdb/testsuite/gdb.arch/gdb1558.exp
b/gdb/testsuite/gdb.arch/gdb1558.exp
index
67f4332
..
87b9f67
100644
(file)
--- a/
gdb/testsuite/gdb.arch/gdb1558.exp
+++ b/
gdb/testsuite/gdb.arch/gdb1558.exp
@@
-21,10
+21,6
@@
# Tests for PR:1558. Hits breakpoint at main after function called
# from main.
# Tests for PR:1558. Hits breakpoint at main after function called
# from main.
-if $tracelevel {
- strace $tracelevel
-}
-
if ![istarget "sh-*-*"] then {
verbose "Skipping SH breakpoint test."
if ![istarget "sh-*-*"] then {
verbose "Skipping SH breakpoint test."
diff --git
a/gdb/testsuite/gdb.arch/i386-avx.exp
b/gdb/testsuite/gdb.arch/i386-avx.exp
index
e66af42
..
0ef25d1
100644
(file)
--- a/
gdb/testsuite/gdb.arch/i386-avx.exp
+++ b/
gdb/testsuite/gdb.arch/i386-avx.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
if { ![istarget i?86-*-*] && ![istarget x86_64-*-* ] } {
verbose "Skipping x86 AVX tests."
if { ![istarget i?86-*-*] && ![istarget x86_64-*-* ] } {
verbose "Skipping x86 AVX tests."
diff --git
a/gdb/testsuite/gdb.arch/i386-bp_permanent.exp
b/gdb/testsuite/gdb.arch/i386-bp_permanent.exp
index
50c81fa
..
026f956
100644
(file)
--- a/
gdb/testsuite/gdb.arch/i386-bp_permanent.exp
+++ b/
gdb/testsuite/gdb.arch/i386-bp_permanent.exp
@@
-16,10
+16,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
# Test stepping over permanent breakpoints on i386.
if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"]) || ![is_ilp32_target] } then {
# Test stepping over permanent breakpoints on i386.
if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"]) || ![is_ilp32_target] } then {
diff --git
a/gdb/testsuite/gdb.arch/i386-byte.exp
b/gdb/testsuite/gdb.arch/i386-byte.exp
index
d13fad8
..
c4b212f
100644
(file)
--- a/
gdb/testsuite/gdb.arch/i386-byte.exp
+++ b/
gdb/testsuite/gdb.arch/i386-byte.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"]) || ![is_ilp32_target] } then {
verbose "Skipping i386 byte register tests."
if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"]) || ![is_ilp32_target] } then {
verbose "Skipping i386 byte register tests."
diff --git
a/gdb/testsuite/gdb.arch/i386-disp-step.exp
b/gdb/testsuite/gdb.arch/i386-disp-step.exp
index
b4e3db4
..
8a51be5
100644
(file)
--- a/
gdb/testsuite/gdb.arch/i386-disp-step.exp
+++ b/
gdb/testsuite/gdb.arch/i386-disp-step.exp
@@
-17,10
+17,6
@@
# Test i386 displaced stepping.
# Test i386 displaced stepping.
-if $tracelevel {
- strace $tracelevel
-}
-
if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"]) || ![is_ilp32_target] } then {
verbose "Skipping x86 displaced stepping tests."
if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"]) || ![is_ilp32_target] } then {
verbose "Skipping x86 displaced stepping tests."
diff --git
a/gdb/testsuite/gdb.arch/i386-gnu-cfi.exp
b/gdb/testsuite/gdb.arch/i386-gnu-cfi.exp
index
7f48514
..
d7b41cc
100644
(file)
--- a/
gdb/testsuite/gdb.arch/i386-gnu-cfi.exp
+++ b/
gdb/testsuite/gdb.arch/i386-gnu-cfi.exp
@@
-20,10
+20,6
@@
# Unwinding of DW_CFA_GNU_negative_offset_extended test program.
# Unwinding of DW_CFA_GNU_negative_offset_extended test program.
-if $tracelevel {
- strace $tracelevel
-}
-
# Test i386 unwinder.
# Test i386 unwinder.
diff --git
a/gdb/testsuite/gdb.arch/i386-permbkpt.exp
b/gdb/testsuite/gdb.arch/i386-permbkpt.exp
index
414abb7
..
df3b373
100644
(file)
--- a/
gdb/testsuite/gdb.arch/i386-permbkpt.exp
+++ b/
gdb/testsuite/gdb.arch/i386-permbkpt.exp
@@
-16,10
+16,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
# Test inserting breakpoints over permanent breakpoints on i386 and amd64.
if { ![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"] } then {
# Test inserting breakpoints over permanent breakpoints on i386 and amd64.
if { ![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"] } then {
diff --git
a/gdb/testsuite/gdb.arch/i386-prologue.exp
b/gdb/testsuite/gdb.arch/i386-prologue.exp
index
21a701e
..
2e724aa
100644
(file)
--- a/
gdb/testsuite/gdb.arch/i386-prologue.exp
+++ b/
gdb/testsuite/gdb.arch/i386-prologue.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
# Test i386 prologue analyzer.
# Test i386 prologue analyzer.
diff --git
a/gdb/testsuite/gdb.arch/i386-size-overlap.exp
b/gdb/testsuite/gdb.arch/i386-size-overlap.exp
index
59d359f
..
23cbabc
100644
(file)
--- a/
gdb/testsuite/gdb.arch/i386-size-overlap.exp
+++ b/
gdb/testsuite/gdb.arch/i386-size-overlap.exp
@@
-15,10
+15,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
# Test that GDB can handle overlapping sizes of symbols.
if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"]) || ![is_ilp32_target] } then {
# Test that GDB can handle overlapping sizes of symbols.
if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"]) || ![is_ilp32_target] } then {
diff --git
a/gdb/testsuite/gdb.arch/i386-size.exp
b/gdb/testsuite/gdb.arch/i386-size.exp
index
c46cd09
..
241d939
100644
(file)
--- a/
gdb/testsuite/gdb.arch/i386-size.exp
+++ b/
gdb/testsuite/gdb.arch/i386-size.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
# Test that GDB can see the sizes of symbols.
if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"]) || ![is_ilp32_target] } then {
# Test that GDB can see the sizes of symbols.
if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"]) || ![is_ilp32_target] } then {
diff --git
a/gdb/testsuite/gdb.arch/i386-sse.exp
b/gdb/testsuite/gdb.arch/i386-sse.exp
index
1a4e408
..
1a868bd
100644
(file)
--- a/
gdb/testsuite/gdb.arch/i386-sse.exp
+++ b/
gdb/testsuite/gdb.arch/i386-sse.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
if { ![istarget i?86-*-*] && ![istarget x86_64-*-* ] } {
verbose "Skipping x86 SSE tests."
if { ![istarget i?86-*-*] && ![istarget x86_64-*-* ] } {
verbose "Skipping x86 SSE tests."
diff --git
a/gdb/testsuite/gdb.arch/i386-unwind.exp
b/gdb/testsuite/gdb.arch/i386-unwind.exp
index
a8be6f7
..
4ae5943
100644
(file)
--- a/
gdb/testsuite/gdb.arch/i386-unwind.exp
+++ b/
gdb/testsuite/gdb.arch/i386-unwind.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
# Test i386 unwinder.
# Test i386 unwinder.
diff --git
a/gdb/testsuite/gdb.arch/i386-word.exp
b/gdb/testsuite/gdb.arch/i386-word.exp
index
701e428
..
317b9f7
100644
(file)
--- a/
gdb/testsuite/gdb.arch/i386-word.exp
+++ b/
gdb/testsuite/gdb.arch/i386-word.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"]) || ![is_ilp32_target] } then {
verbose "Skipping i386 word register tests."
if {(![istarget "x86_64-*-*"] && ![istarget "i?86-*-*"]) || ![is_ilp32_target] } then {
verbose "Skipping i386 word register tests."
diff --git
a/gdb/testsuite/gdb.arch/pa-nullify.exp
b/gdb/testsuite/gdb.arch/pa-nullify.exp
index
77e7ca7
..
e3223d9
100644
(file)
--- a/
gdb/testsuite/gdb.arch/pa-nullify.exp
+++ b/
gdb/testsuite/gdb.arch/pa-nullify.exp
@@
-15,10
+15,6
@@
#
# This file is part of the gdb testsuite.
#
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
# Test handling of nullified instructions for the pa target.
# Test handling of nullified instructions for the pa target.
diff --git
a/gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp
b/gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp
index
241dd4f
..
860e68e
100644
(file)
--- a/
gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp
+++ b/
gdb/testsuite/gdb.arch/powerpc-aix-prologue.exp
@@
-15,10
+15,6
@@
#
# This file is part of the gdb testsuite.
#
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
# Test rs6000 prologue analyzer.
# Test rs6000 prologue analyzer.
diff --git
a/gdb/testsuite/gdb.arch/powerpc-d128-regs.exp
b/gdb/testsuite/gdb.arch/powerpc-d128-regs.exp
index
18d7801
..
5e952d8
100644
(file)
--- a/
gdb/testsuite/gdb.arch/powerpc-d128-regs.exp
+++ b/
gdb/testsuite/gdb.arch/powerpc-d128-regs.exp
@@
-20,10
+20,6
@@
# Testcase for ppc decimal128 pseudo-registers.
# Testcase for ppc decimal128 pseudo-registers.
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "powerpc64-*"] then {
verbose "Skipping powerpc Decimal128 pseudo-registers testcase."
return
if ![istarget "powerpc64-*"] then {
verbose "Skipping powerpc Decimal128 pseudo-registers testcase."
return
diff --git
a/gdb/testsuite/gdb.arch/ppc-dfp.exp
b/gdb/testsuite/gdb.arch/ppc-dfp.exp
index
a44a5ac
..
d08424b
100644
(file)
--- a/
gdb/testsuite/gdb.arch/ppc-dfp.exp
+++ b/
gdb/testsuite/gdb.arch/ppc-dfp.exp
@@
-16,10
+16,6
@@
# Tests for Powerpc Decimal Floating Point registers setting and fetching
# Tests for Powerpc Decimal Floating Point registers setting and fetching
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "powerpc*"] then {
verbose "Skipping powerpc decimal floating point register tests."
return
if ![istarget "powerpc*"] then {
verbose "Skipping powerpc decimal floating point register tests."
return
diff --git
a/gdb/testsuite/gdb.arch/ppc-fp.exp
b/gdb/testsuite/gdb.arch/ppc-fp.exp
index
41a4865
..
2eff7fb
100644
(file)
--- a/
gdb/testsuite/gdb.arch/ppc-fp.exp
+++ b/
gdb/testsuite/gdb.arch/ppc-fp.exp
@@
-16,10
+16,6
@@
# Tests for Powerpc floating point register setting and fetching
# Tests for Powerpc floating point register setting and fetching
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "powerpc*"] then {
verbose "Skipping powerpc floating point register tests."
return
if ![istarget "powerpc*"] then {
verbose "Skipping powerpc floating point register tests."
return
diff --git
a/gdb/testsuite/gdb.arch/ppc64-atomic-inst.exp
b/gdb/testsuite/gdb.arch/ppc64-atomic-inst.exp
index
b96b136
..
53998d3
100644
(file)
--- a/
gdb/testsuite/gdb.arch/ppc64-atomic-inst.exp
+++ b/
gdb/testsuite/gdb.arch/ppc64-atomic-inst.exp
@@
-16,10
+16,6
@@
#
# This file is part of the gdb testsuite.
#
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
# Test single stepping through atomic sequences beginning with
# a lwarx/ldarx instruction and ending with a stwcx/stdcx
# instruction.
# Test single stepping through atomic sequences beginning with
# a lwarx/ldarx instruction and ending with a stwcx/stdcx
# instruction.
diff --git
a/gdb/testsuite/gdb.arch/system-gcore.exp
b/gdb/testsuite/gdb.arch/system-gcore.exp
index
c5e6724
..
ab97f69
100644
(file)
--- a/
gdb/testsuite/gdb.arch/system-gcore.exp
+++ b/
gdb/testsuite/gdb.arch/system-gcore.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/>.
# 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
-}
-
if { ![istarget i?86-*-linux*] && ![istarget x86_64-*-linux* ] } {
verbose "Skipping system register gcore tests."
if { ![istarget i?86-*-linux*] && ![istarget x86_64-*-linux* ] } {
verbose "Skipping system register gcore tests."
diff --git
a/gdb/testsuite/gdb.arch/vsx-regs.exp
b/gdb/testsuite/gdb.arch/vsx-regs.exp
index
7a0bf57
..
82201a3
100644
(file)
--- a/
gdb/testsuite/gdb.arch/vsx-regs.exp
+++ b/
gdb/testsuite/gdb.arch/vsx-regs.exp
@@
-14,10
+14,6
@@
# along with this program. If not, see <http://www.gnu.org/licenses/>.
#
# along with this program. If not, see <http://www.gnu.org/licenses/>.
#
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# Test the use of VSX registers, for Powerpc.
#
#
# Test the use of VSX registers, for Powerpc.
#
diff --git
a/gdb/testsuite/gdb.asm/asm-source.exp
b/gdb/testsuite/gdb.asm/asm-source.exp
index
18f9a7b
..
9c2435b
100644
(file)
--- a/
gdb/testsuite/gdb.asm/asm-source.exp
+++ b/
gdb/testsuite/gdb.asm/asm-source.exp
@@
-15,10
+15,6
@@
#
# This file was written by Kendra.
#
# This file was written by Kendra.
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# Test debugging assembly level programs.
# This file uses asmsrc[12].s for input.
#
# Test debugging assembly level programs.
# This file uses asmsrc[12].s for input.
diff --git
a/gdb/testsuite/gdb.base/a2-run.exp
b/gdb/testsuite/gdb.base/a2-run.exp
index
c069851
..
4e3b54b
100644
(file)
--- a/
gdb/testsuite/gdb.base/a2-run.exp
+++ b/
gdb/testsuite/gdb.base/a2-run.exp
@@
-21,10
+21,6
@@
if [gdb_skip_stdio_test "a2run.exp"] {
return
}
return
}
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/advance.exp
b/gdb/testsuite/gdb.base/advance.exp
index
c4fc63f
..
456268d
100644
(file)
--- a/
gdb/testsuite/gdb.base/advance.exp
+++ b/
gdb/testsuite/gdb.base/advance.exp
@@
-15,10
+15,6
@@
# advance.exp -- Expect script to test 'advance' in gdb
# advance.exp -- Expect script to test 'advance' in gdb
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile advance
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile advance
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/all-bin.exp
b/gdb/testsuite/gdb.base/all-bin.exp
index
94ec1d1
..
0ac8185
100644
(file)
--- a/
gdb/testsuite/gdb.base/all-bin.exp
+++ b/
gdb/testsuite/gdb.base/all-bin.exp
@@
-23,10
+23,6
@@
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/annota1.exp
b/gdb/testsuite/gdb.base/annota1.exp
index
8639bb1
..
66f96e7
100644
(file)
--- a/
gdb/testsuite/gdb.base/annota1.exp
+++ b/
gdb/testsuite/gdb.base/annota1.exp
@@
-15,10
+15,6
@@
# This file was written by Elena Zannoni (ezannoni@cygnus.com)
# This file was written by Elena Zannoni (ezannoni@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
# are we on a target board? If so, don't run these tests.
# note: this is necessary because we cannot use runto_main (which would
# are we on a target board? If so, don't run these tests.
# note: this is necessary because we cannot use runto_main (which would
diff --git
a/gdb/testsuite/gdb.base/annota3.exp
b/gdb/testsuite/gdb.base/annota3.exp
index
c20d641
..
82abc0a
100644
(file)
--- a/
gdb/testsuite/gdb.base/annota3.exp
+++ b/
gdb/testsuite/gdb.base/annota3.exp
@@
-15,10
+15,6
@@
# This file was written by Elena Zannoni (ezannoni@cygnus.com)
# This file was written by Elena Zannoni (ezannoni@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
# are we on a target board? If so, don't run these tests.
# note: this is necessary because we cannot use runto_main (which would
# are we on a target board? If so, don't run these tests.
# note: this is necessary because we cannot use runto_main (which would
diff --git
a/gdb/testsuite/gdb.base/args.exp
b/gdb/testsuite/gdb.base/args.exp
index
d9473a5
..
4b812de
100644
(file)
--- a/
gdb/testsuite/gdb.base/args.exp
+++ b/
gdb/testsuite/gdb.base/args.exp
@@
-15,10
+15,6
@@
# This is a test for the gdb invocation option --args.
# This is a test for the gdb invocation option --args.
-if $tracelevel then {
- strace $tracelevel
-}
-
global GDBFLAGS
global GDBFLAGS
diff --git
a/gdb/testsuite/gdb.base/arithmet.exp
b/gdb/testsuite/gdb.base/arithmet.exp
index
6037e0d
..
b8a3856
100644
(file)
--- a/
gdb/testsuite/gdb.base/arithmet.exp
+++ b/
gdb/testsuite/gdb.base/arithmet.exp
@@
-22,10
+22,6
@@
# with integer type variables
#
# with integer type variables
#
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/arrayidx.exp
b/gdb/testsuite/gdb.base/arrayidx.exp
index
ed8e17a
..
cba0024
100644
(file)
--- a/
gdb/testsuite/gdb.base/arrayidx.exp
+++ b/
gdb/testsuite/gdb.base/arrayidx.exp
@@
-17,10
+17,6
@@
# gdb can correctly print arrays with indexes for each element of the
# array.
# gdb can correctly print arrays with indexes for each element of the
# array.
-if $tracelevel {
- strace $tracelevel
-}
-
set testfile "arrayidx"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "arrayidx"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/assign.exp
b/gdb/testsuite/gdb.base/assign.exp
index
db639eb
..
8fb87d9
100644
(file)
--- a/
gdb/testsuite/gdb.base/assign.exp
+++ b/
gdb/testsuite/gdb.base/assign.exp
@@
-21,10
+21,6
@@
# with mixed types and with int type variables
#
# with mixed types and with int type variables
#
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/async.exp
b/gdb/testsuite/gdb.base/async.exp
index
8aaf3d3
..
4acd153
100644
(file)
--- a/
gdb/testsuite/gdb.base/async.exp
+++ b/
gdb/testsuite/gdb.base/async.exp
@@
-14,10
+14,6
@@
# along with this program. If not, see <http://www.gnu.org/licenses/>.
# along with this program. If not, see <http://www.gnu.org/licenses/>.
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/attach.exp
b/gdb/testsuite/gdb.base/attach.exp
index
f28a537
..
87a22de
100644
(file)
--- a/
gdb/testsuite/gdb.base/attach.exp
+++ b/
gdb/testsuite/gdb.base/attach.exp
@@
-14,10
+14,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/>. */
# 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
-}
-
# On HP-UX 11.0, this test is causing a process running the program
# "attach" to be left around spinning. Until we figure out why, I am
# On HP-UX 11.0, this test is causing a process running the program
# "attach" to be left around spinning. Until we figure out why, I am
diff --git
a/gdb/testsuite/gdb.base/auxv.exp
b/gdb/testsuite/gdb.base/auxv.exp
index
e0f4cb4
..
da10f05
100644
(file)
--- a/
gdb/testsuite/gdb.base/auxv.exp
+++ b/
gdb/testsuite/gdb.base/auxv.exp
@@
-24,10
+24,6
@@
if { ! [istarget "*-*-linux*"] && ! [istarget "*-*-solaris*"] } {
return
}
return
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "auxv"
set srcfile ${testfile}.c
set testfile "auxv"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/bang.exp
b/gdb/testsuite/gdb.base/bang.exp
index
1d7365a
..
77b10d6
100644
(file)
--- a/
gdb/testsuite/gdb.base/bang.exp
+++ b/
gdb/testsuite/gdb.base/bang.exp
@@
-16,10
+16,6
@@
# This is a test that verifies that GDB is able to "run" when the name
# of the executable file contains a '!'.
# This is a test that verifies that GDB is able to "run" when the name
# of the executable file contains a '!'.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "args"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/bang!
set testfile "args"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/bang!
diff --git
a/gdb/testsuite/gdb.base/bfp-test.exp
b/gdb/testsuite/gdb.base/bfp-test.exp
index
72c9643
..
26ac7ff
100644
(file)
--- a/
gdb/testsuite/gdb.base/bfp-test.exp
+++ b/
gdb/testsuite/gdb.base/bfp-test.exp
@@
-16,10
+16,6
@@
# This file is part of the gdb testsuite. It is intended to test that
# gdb could correctly handle floating point constant with a suffix.
# This file is part of the gdb testsuite. It is intended to test that
# gdb could correctly handle floating point constant with a suffix.
-if $tracelevel {
- strace $tracelevel
-}
-
set testfile "bfp-test"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "bfp-test"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/bigcore.exp
b/gdb/testsuite/gdb.base/bigcore.exp
index
a2ef54a
..
2e05da5
100644
(file)
--- a/
gdb/testsuite/gdb.base/bigcore.exp
+++ b/
gdb/testsuite/gdb.base/bigcore.exp
@@
-17,10
+17,6
@@
# This file is based on corefile.exp which was written by Fred
# Fish. (fnf@cygnus.com)
# This file is based on corefile.exp which was written by Fred
# Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
# Are we on a target board? As of 2004-02-12, GDB didn't have a
# mechanism that would let it efficiently access a remote corefile.
# Are we on a target board? As of 2004-02-12, GDB didn't have a
# mechanism that would let it efficiently access a remote corefile.
diff --git
a/gdb/testsuite/gdb.base/bitfields.exp
b/gdb/testsuite/gdb.base/bitfields.exp
index
6734ea1
..
3098ffd
100644
(file)
--- a/
gdb/testsuite/gdb.base/bitfields.exp
+++ b/
gdb/testsuite/gdb.base/bitfields.exp
@@
-16,10
+16,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "bitfields"
set srcfile ${testfile}.c
set testfile "bitfields"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/bitfields2.exp
b/gdb/testsuite/gdb.base/bitfields2.exp
index
3da53b9
..
137090b
100644
(file)
--- a/
gdb/testsuite/gdb.base/bitfields2.exp
+++ b/
gdb/testsuite/gdb.base/bitfields2.exp
@@
-23,10
+23,6
@@
# in bitfields.c, which considers only bit-fields that are <= 9 bits long.
#
# in bitfields.c, which considers only bit-fields that are <= 9 bits long.
#
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "bitfields2"
set srcfile ${testfile}.c
set testfile "bitfields2"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/bitops.exp
b/gdb/testsuite/gdb.base/bitops.exp
index
dab4fd0
..
bfb3a12
100644
(file)
--- a/
gdb/testsuite/gdb.base/bitops.exp
+++ b/
gdb/testsuite/gdb.base/bitops.exp
@@
-23,10
+23,6
@@
#
#
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/break-on-linker-gcd-function.exp
b/gdb/testsuite/gdb.base/break-on-linker-gcd-function.exp
index
4f13999
..
fc71a5f
100644
(file)
--- a/
gdb/testsuite/gdb.base/break-on-linker-gcd-function.exp
+++ b/
gdb/testsuite/gdb.base/break-on-linker-gcd-function.exp
@@
-20,10
+20,6
@@
# This file is part of the gdb testsuite
# This file is part of the gdb testsuite
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/call-ar-st.exp
b/gdb/testsuite/gdb.base/call-ar-st.exp
index
d0a0e86
..
50ca37c
100644
(file)
--- a/
gdb/testsuite/gdb.base/call-ar-st.exp
+++ b/
gdb/testsuite/gdb.base/call-ar-st.exp
@@
-16,10
+16,6
@@
# This file was written by Elena Zannoni (ezannoni@cygnus.com)
# This file was written by Elena Zannoni (ezannoni@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "call-ar-st"
set srcfile ${testfile}.c
set testfile "call-ar-st"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/call-rt-st.exp
b/gdb/testsuite/gdb.base/call-rt-st.exp
index
078369a
..
a531188
100644
(file)
--- a/
gdb/testsuite/gdb.base/call-rt-st.exp
+++ b/
gdb/testsuite/gdb.base/call-rt-st.exp
@@
-20,10
+20,6
@@
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "call-rt-st"
set srcfile ${testfile}.c
set testfile "call-rt-st"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/call-sc.exp
b/gdb/testsuite/gdb.base/call-sc.exp
index
fda75f2
..
135010c
100644
(file)
--- a/
gdb/testsuite/gdb.base/call-sc.exp
+++ b/
gdb/testsuite/gdb.base/call-sc.exp
@@
-18,10
+18,6
@@
# Test "return", "finish", and "call" of functions that a scalar (int,
# float, enum) and/or take a single scalar parameter.
# Test "return", "finish", and "call" of functions that a scalar (int,
# float, enum) and/or take a single scalar parameter.
-if $tracelevel then {
- strace $tracelevel
-}
-
# Some targets can't call functions, so don't even bother with this
# test.
# Some targets can't call functions, so don't even bother with this
# test.
diff --git
a/gdb/testsuite/gdb.base/call-signal-resume.exp
b/gdb/testsuite/gdb.base/call-signal-resume.exp
index
9c67941
..
1c4517d
100644
(file)
--- a/
gdb/testsuite/gdb.base/call-signal-resume.exp
+++ b/
gdb/testsuite/gdb.base/call-signal-resume.exp
@@
-20,10
+20,6
@@
# 2) Inferior is stopped at a signal. Upon resumption it should continue
# with that signal, regardless of whatever the hand-called function did.
# 2) Inferior is stopped at a signal. Upon resumption it should continue
# with that signal, regardless of whatever the hand-called function did.
-if $tracelevel then {
- strace $tracelevel
-}
-
if [target_info exists gdb,noinferiorio] {
verbose "Skipping call-signal-resume.exp because of no fileio capabilities."
continue
if [target_info exists gdb,noinferiorio] {
verbose "Skipping call-signal-resume.exp because of no fileio capabilities."
continue
diff --git
a/gdb/testsuite/gdb.base/call-strs.exp
b/gdb/testsuite/gdb.base/call-strs.exp
index
6d96fcf
..
43d7ef6
100644
(file)
--- a/
gdb/testsuite/gdb.base/call-strs.exp
+++ b/
gdb/testsuite/gdb.base/call-strs.exp
@@
-22,10
+22,6
@@
#debug strarg
#debug strarg
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "call-strs"
set srcfile ${testfile}.c
set testfile "call-strs"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/callexit.exp
b/gdb/testsuite/gdb.base/callexit.exp
index
50c50ea
..
c4d1ec5
100644
(file)
--- a/
gdb/testsuite/gdb.base/callexit.exp
+++ b/
gdb/testsuite/gdb.base/callexit.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/>.
# 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
-}
-
set testfile "callexit"
set srcfile ${testfile}.c
set testfile "callexit"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/callfuncs.exp
b/gdb/testsuite/gdb.base/callfuncs.exp
index
765be20
..
c48fa60
100644
(file)
--- a/
gdb/testsuite/gdb.base/callfuncs.exp
+++ b/
gdb/testsuite/gdb.base/callfuncs.exp
@@
-16,10
+16,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# and modified by Bob Manson. (manson@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
# and modified by Bob Manson. (manson@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "callfuncs"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "callfuncs"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/charset.exp
b/gdb/testsuite/gdb.base/charset.exp
index
651633b
..
47cf954
100644
(file)
--- a/
gdb/testsuite/gdb.base/charset.exp
+++ b/
gdb/testsuite/gdb.base/charset.exp
@@
-20,10
+20,6
@@
# Test GDB's character set support.
# Test GDB's character set support.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "charset"
set srcfile ${testfile}.c
set testfile "charset"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/checkpoint.exp
b/gdb/testsuite/gdb.base/checkpoint.exp
index
2aec424
..
fabe39d
100644
(file)
--- a/
gdb/testsuite/gdb.base/checkpoint.exp
+++ b/
gdb/testsuite/gdb.base/checkpoint.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/>. */
# 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
- }
-
if { [is_remote target] || ![isnative] } then {
continue
}
if { [is_remote target] || ![isnative] } then {
continue
}
diff --git
a/gdb/testsuite/gdb.base/chng-syms.exp
b/gdb/testsuite/gdb.base/chng-syms.exp
index
dac3008
..
ec5b4c8
100644
(file)
--- a/
gdb/testsuite/gdb.base/chng-syms.exp
+++ b/
gdb/testsuite/gdb.base/chng-syms.exp
@@
-18,10
+18,6
@@
# Test that GDB cleans up properly after errors that result when a
# breakpoint is reset.
# Test that GDB cleans up properly after errors that result when a
# breakpoint is reset.
-if $tracelevel then {
- strace $tracelevel
-}
-
# IDT/SIM apparently doesn't have enough file descriptors to allow the
# problem checked by this test to occur.
# IDT/SIM apparently doesn't have enough file descriptors to allow the
# problem checked by this test to occur.
diff --git
a/gdb/testsuite/gdb.base/code-expr.exp
b/gdb/testsuite/gdb.base/code-expr.exp
index
9c91de1
..
fe95305
100644
(file)
--- a/
gdb/testsuite/gdb.base/code-expr.exp
+++ b/
gdb/testsuite/gdb.base/code-expr.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite
# Tests for type expressions using the new "@code" and "@data" modifiers.
# This file is part of the gdb testsuite
# Tests for type expressions using the new "@code" and "@data" modifiers.
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/code_elim.exp
b/gdb/testsuite/gdb.base/code_elim.exp
index
7369a9c
..
b8ef629
100644
(file)
--- a/
gdb/testsuite/gdb.base/code_elim.exp
+++ b/
gdb/testsuite/gdb.base/code_elim.exp
@@
-16,10
+16,6
@@
# code_elim.exp -- tests that GDB can handle executables where some data/code
# has been eliminated by the linker.
# code_elim.exp -- tests that GDB can handle executables where some data/code
# has been eliminated by the linker.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile1 code_elim1
set testfile2 code_elim2
set srcfile1 ${testfile1}.c
set testfile1 code_elim1
set testfile2 code_elim2
set srcfile1 ${testfile1}.c
diff --git
a/gdb/testsuite/gdb.base/commands.exp
b/gdb/testsuite/gdb.base/commands.exp
index
0be5c45
..
e26dac0
100644
(file)
--- a/
gdb/testsuite/gdb.base/commands.exp
+++ b/
gdb/testsuite/gdb.base/commands.exp
@@
-14,10
+14,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/>.
# 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
-}
-
#
# test special commands (if, while, etc)
#
#
# test special commands (if, while, etc)
#
diff --git
a/gdb/testsuite/gdb.base/completion.exp
b/gdb/testsuite/gdb.base/completion.exp
index
06ccfd6
..
35fb537
100644
(file)
--- a/
gdb/testsuite/gdb.base/completion.exp
+++ b/
gdb/testsuite/gdb.base/completion.exp
@@
-46,10
+46,6
@@
#
#
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
# test running programs
diff --git
a/gdb/testsuite/gdb.base/complex.exp
b/gdb/testsuite/gdb.base/complex.exp
index
1de9a93
..
ff403b5
100644
(file)
--- a/
gdb/testsuite/gdb.base/complex.exp
+++ b/
gdb/testsuite/gdb.base/complex.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/>.
# 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
-}
-
set testfile complex
set srcfile ${testfile}.c
set testfile complex
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/cond-expr.exp
b/gdb/testsuite/gdb.base/cond-expr.exp
index
e9d61ba
..
9b51034
100644
(file)
--- a/
gdb/testsuite/gdb.base/cond-expr.exp
+++ b/
gdb/testsuite/gdb.base/cond-expr.exp
@@
-27,10
+27,6
@@
#
#
-if $tracelevel then {
- strace $tracelevel
-}
-
# Check to see if we have an executable to test. If not, then either we
# haven't tried to compile one, or the compilation failed for some reason.
# In either case, just notify the user and skip the tests in this file.
# Check to see if we have an executable to test. If not, then either we
# haven't tried to compile one, or the compilation failed for some reason.
# In either case, just notify the user and skip the tests in this file.
diff --git
a/gdb/testsuite/gdb.base/condbreak.exp
b/gdb/testsuite/gdb.base/condbreak.exp
index
b806729
..
fb82e56
100644
(file)
--- a/
gdb/testsuite/gdb.base/condbreak.exp
+++ b/
gdb/testsuite/gdb.base/condbreak.exp
@@
-17,10
+17,6
@@
# Purpose is to test conditional breakpoints.
# Modeled after "break.exp".
# Purpose is to test conditional breakpoints.
# Modeled after "break.exp".
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/consecutive.exp
b/gdb/testsuite/gdb.base/consecutive.exp
index
03d4bd1
..
c3edaf6
100644
(file)
--- a/
gdb/testsuite/gdb.base/consecutive.exp
+++ b/
gdb/testsuite/gdb.base/consecutive.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder. (msnyder@redhat.com)
# This file was written by Michael Snyder. (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# Test breakpoints at consecutive instruction addresses.
#
#
# Test breakpoints at consecutive instruction addresses.
#
diff --git
a/gdb/testsuite/gdb.base/constvars.exp
b/gdb/testsuite/gdb.base/constvars.exp
index
e5d64bd
..
7764d04
100644
(file)
--- a/
gdb/testsuite/gdb.base/constvars.exp
+++ b/
gdb/testsuite/gdb.base/constvars.exp
@@
-23,10
+23,6
@@
# const pointers to const vars
# with mixed types
# const pointers to const vars
# with mixed types
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/corefile.exp
b/gdb/testsuite/gdb.base/corefile.exp
index
a91efd1
..
027eb2c
100644
(file)
--- a/
gdb/testsuite/gdb.base/corefile.exp
+++ b/
gdb/testsuite/gdb.base/corefile.exp
@@
-15,10
+15,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
# are we on a target board
if ![isnative] then {
# are we on a target board
if ![isnative] then {
diff --git
a/gdb/testsuite/gdb.base/cursal.exp
b/gdb/testsuite/gdb.base/cursal.exp
index
808f6be
..
ce77363
100644
(file)
--- a/
gdb/testsuite/gdb.base/cursal.exp
+++ b/
gdb/testsuite/gdb.base/cursal.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/>.
# 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 {
- strace $tracelevel
-}
-
set testfile "cursal"
set srcfile ${testfile}.c
set testfile "cursal"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/cvexpr.exp
b/gdb/testsuite/gdb.base/cvexpr.exp
index
b9c4f53
..
d836d4a
100644
(file)
--- a/
gdb/testsuite/gdb.base/cvexpr.exp
+++ b/
gdb/testsuite/gdb.base/cvexpr.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite
# Tests for type expressions using const and volatile keywords.
# This file is part of the gdb testsuite
# Tests for type expressions using const and volatile keywords.
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/dbx.exp
b/gdb/testsuite/gdb.base/dbx.exp
index
cfd6330
..
843d637
100644
(file)
--- a/
gdb/testsuite/gdb.base/dbx.exp
+++ b/
gdb/testsuite/gdb.base/dbx.exp
@@
-14,10
+14,6
@@
# along with this program. If not, see <http://www.gnu.org/licenses/>. */
# along with this program. If not, see <http://www.gnu.org/licenses/>. */
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile1 "average"
set testfile2 "sum"
set testfile "dbx-test"
set testfile1 "average"
set testfile2 "sum"
set testfile "dbx-test"
diff --git
a/gdb/testsuite/gdb.base/define.exp
b/gdb/testsuite/gdb.base/define.exp
index
a0b5377
..
889eca8
100644
(file)
--- a/
gdb/testsuite/gdb.base/define.exp
+++ b/
gdb/testsuite/gdb.base/define.exp
@@
-16,10
+16,6
@@
# This file was written by Elena Zannoni. (ezannoni@cygnus.com)
# This file was written by Elena Zannoni. (ezannoni@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
# test running programs
diff --git
a/gdb/testsuite/gdb.base/del.exp
b/gdb/testsuite/gdb.base/del.exp
index
ddeb78c
..
1a37330
100644
(file)
--- a/
gdb/testsuite/gdb.base/del.exp
+++ b/
gdb/testsuite/gdb.base/del.exp
@@
-16,10
+16,6
@@
# The intent of this testcase is to verify that various aliases and
# shortcuts of the "delete" command never stop working.
# The intent of this testcase is to verify that various aliases and
# shortcuts of the "delete" command never stop working.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile del
set srcfile ${testfile}.c
set testfile del
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/detach.exp
b/gdb/testsuite/gdb.base/detach.exp
index
9bfb828
..
11fe3f4
100644
(file)
--- a/
gdb/testsuite/gdb.base/detach.exp
+++ b/
gdb/testsuite/gdb.base/detach.exp
@@
-16,10
+16,6
@@
# Test running a program from the GDB prompt and then detaching it.
# NOTE: This test could be much more thorough.
# Test running a program from the GDB prompt and then detaching it.
# NOTE: This test could be much more thorough.
-if $tracelevel then {
- strace $tracelevel
-}
-
# Only GNU/Linux is known to support this.
if { ! [istarget "*-*-linux*"] } {
# Only GNU/Linux is known to support this.
if { ! [istarget "*-*-linux*"] } {
diff --git
a/gdb/testsuite/gdb.base/dfp-exprs.exp
b/gdb/testsuite/gdb.base/dfp-exprs.exp
index
b27e727
..
58f7156
100644
(file)
--- a/
gdb/testsuite/gdb.base/dfp-exprs.exp
+++ b/
gdb/testsuite/gdb.base/dfp-exprs.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite. It contains test for evaluating
# simple decimal floating point (DFP) expression.
# This file is part of the gdb testsuite. It contains test for evaluating
# simple decimal floating point (DFP) expression.
-if $tracelevel then {
- strace $tracelevel
-}
-
proc test_dfp_literals_accepted {} {
# Test various dfp values, covering 32-bit, 64-bit and 128-bit ones
proc test_dfp_literals_accepted {} {
# Test various dfp values, covering 32-bit, 64-bit and 128-bit ones
diff --git
a/gdb/testsuite/gdb.base/dfp-test.exp
b/gdb/testsuite/gdb.base/dfp-test.exp
index
d0628e0
..
a59065a
100644
(file)
--- a/
gdb/testsuite/gdb.base/dfp-test.exp
+++ b/
gdb/testsuite/gdb.base/dfp-test.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite. It is intended to test that
# gdb could correctly handle decimal floating point introduced in IEEE 754R.
# This file is part of the gdb testsuite. It is intended to test that
# gdb could correctly handle decimal floating point introduced in IEEE 754R.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "dfp-test"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "dfp-test"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/display.exp
b/gdb/testsuite/gdb.base/display.exp
index
b484346
..
4136cc1
100644
(file)
--- a/
gdb/testsuite/gdb.base/display.exp
+++ b/
gdb/testsuite/gdb.base/display.exp
@@
-16,10
+16,6
@@
# display.exp Test display commands
# Also do some printing stuff for coverage's sake.
#
# display.exp Test display commands
# Also do some printing stuff for coverage's sake.
#
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile display
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile display
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/dump.exp
b/gdb/testsuite/gdb.base/dump.exp
index
a59c71b
..
44cccbf
100644
(file)
--- a/
gdb/testsuite/gdb.base/dump.exp
+++ b/
gdb/testsuite/gdb.base/dump.exp
@@
-16,10
+16,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This is a test for the gdb command "dump".
# This file was written by Michael Snyder (msnyder@redhat.com)
# This is a test for the gdb command "dump".
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "dump"
set testfile "dump"
diff --git
a/gdb/testsuite/gdb.base/echo.exp
b/gdb/testsuite/gdb.base/echo.exp
index
e50ef98
..
f704396
100644
(file)
--- a/
gdb/testsuite/gdb.base/echo.exp
+++ b/
gdb/testsuite/gdb.base/echo.exp
@@
-19,10
+19,6
@@
# Crank up gdb.
gdb_start
# Crank up gdb.
gdb_start
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test the echo command
#
#
# test the echo command
#
diff --git
a/gdb/testsuite/gdb.base/ena-dis-br.exp
b/gdb/testsuite/gdb.base/ena-dis-br.exp
index
3e549c0
..
2e5cdb1
100644
(file)
--- a/
gdb/testsuite/gdb.base/ena-dis-br.exp
+++ b/
gdb/testsuite/gdb.base/ena-dis-br.exp
@@
-16,10
+16,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/>.
# 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
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/environ.exp
b/gdb/testsuite/gdb.base/environ.exp
index
60536fb
..
2466c81
100644
(file)
--- a/
gdb/testsuite/gdb.base/environ.exp
+++ b/
gdb/testsuite/gdb.base/environ.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/>. */
# 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
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/eval-skip.exp
b/gdb/testsuite/gdb.base/eval-skip.exp
index
8b70339
..
8e296d3
100644
(file)
--- a/
gdb/testsuite/gdb.base/eval-skip.exp
+++ b/
gdb/testsuite/gdb.base/eval-skip.exp
@@
-28,10
+28,6
@@
#
#
-if $tracelevel then {
- strace $tracelevel
-}
-
# Check to see if we have an executable to test. If not, then either we
# haven't tried to compile one, or the compilation failed for some reason.
# In either case, just notify the user and skip the tests in this file.
# Check to see if we have an executable to test. If not, then either we
# haven't tried to compile one, or the compilation failed for some reason.
# In either case, just notify the user and skip the tests in this file.
diff --git
a/gdb/testsuite/gdb.base/exe-lock.exp
b/gdb/testsuite/gdb.base/exe-lock.exp
index
c6413f1
..
150b58e
100644
(file)
--- a/
gdb/testsuite/gdb.base/exe-lock.exp
+++ b/
gdb/testsuite/gdb.base/exe-lock.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/>.
# 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 {
- strace $tracelevel
-}
-
# The intent of this testcase is to verify that GDB does not keep
# a filesystem lock on the executable file once the executable
# is no longer running.
# The intent of this testcase is to verify that GDB does not keep
# a filesystem lock on the executable file once the executable
# is no longer running.
diff --git
a/gdb/testsuite/gdb.base/expand-psymtabs.exp
b/gdb/testsuite/gdb.base/expand-psymtabs.exp
index
93ea864
..
25f3bda
100644
(file)
--- a/
gdb/testsuite/gdb.base/expand-psymtabs.exp
+++ b/
gdb/testsuite/gdb.base/expand-psymtabs.exp
@@
-16,10
+16,6
@@
#
# This file is part of the gdb testsuite.
#
# This file is part of the gdb testsuite.
-if $tracelevel then {
- strace $tracelevel
-}
-
# It's possible to have a program that contains two compilation units
# for the same source file name, that have code at different lines.
# For example, in this test, we compile expand-psymtabs.c twice with
# It's possible to have a program that contains two compilation units
# for the same source file name, that have code at different lines.
# For example, in this test, we compile expand-psymtabs.c twice with
diff --git
a/gdb/testsuite/gdb.base/exprs.exp
b/gdb/testsuite/gdb.base/exprs.exp
index
67c89f0
..
f46a8e6
100644
(file)
--- a/
gdb/testsuite/gdb.base/exprs.exp
+++ b/
gdb/testsuite/gdb.base/exprs.exp
@@
-16,10
+16,6
@@
# This file was written by Rob Savoye. (rob@cygnus.com)
# This file was written by Rob Savoye. (rob@cygnus.com)
-if $tracelevel {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/fileio.exp
b/gdb/testsuite/gdb.base/fileio.exp
index
6ce3e01
..
e8760da
100644
(file)
--- a/
gdb/testsuite/gdb.base/fileio.exp
+++ b/
gdb/testsuite/gdb.base/fileio.exp
@@
-20,10
+20,6
@@
if [target_info exists gdb,nofileio] {
continue
}
continue
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "fileio"
set srcfile ${testfile}.c
set testfile "fileio"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/find.exp
b/gdb/testsuite/gdb.base/find.exp
index
2f33973
..
664481c
100644
(file)
--- a/
gdb/testsuite/gdb.base/find.exp
+++ b/
gdb/testsuite/gdb.base/find.exp
@@
-15,10
+15,6
@@
# This tests the find command.
# This tests the find command.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "find"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "find"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/finish.exp
b/gdb/testsuite/gdb.base/finish.exp
index
dc96af5
..
c782ffc
100644
(file)
--- a/
gdb/testsuite/gdb.base/finish.exp
+++ b/
gdb/testsuite/gdb.base/finish.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
# re-use the program from the "return2" test.
if { [prepare_for_testing finish.exp finish return2.c] } {
# re-use the program from the "return2" test.
if { [prepare_for_testing finish.exp finish return2.c] } {
diff --git
a/gdb/testsuite/gdb.base/fixsection.exp
b/gdb/testsuite/gdb.base/fixsection.exp
index
59f51c5
..
c4aee67
100644
(file)
--- a/
gdb/testsuite/gdb.base/fixsection.exp
+++ b/
gdb/testsuite/gdb.base/fixsection.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/>.
# 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
-}
-
if {[skip_shlib_tests]} {
return 0
if {[skip_shlib_tests]} {
return 0
diff --git
a/gdb/testsuite/gdb.base/float.exp
b/gdb/testsuite/gdb.base/float.exp
index
4e75088
..
448102b
100644
(file)
--- a/
gdb/testsuite/gdb.base/float.exp
+++ b/
gdb/testsuite/gdb.base/float.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
#
# Test floating-point related functionality.
#
#
# Test floating-point related functionality.
#
diff --git
a/gdb/testsuite/gdb.base/frame-args.exp
b/gdb/testsuite/gdb.base/frame-args.exp
index
d349f93
..
14e5872
100644
(file)
--- a/
gdb/testsuite/gdb.base/frame-args.exp
+++ b/
gdb/testsuite/gdb.base/frame-args.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/>.
# 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 {
- strace $tracelevel
-}
-
set testfile "frame-args"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "frame-args"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/funcargs.exp
b/gdb/testsuite/gdb.base/funcargs.exp
index
f1236cf
..
0b5534a
100644
(file)
--- a/
gdb/testsuite/gdb.base/funcargs.exp
+++ b/
gdb/testsuite/gdb.base/funcargs.exp
@@
-16,10
+16,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel {
- strace $tracelevel
-}
-
set testfile "funcargs"
set srcfile ${testfile}.c
set testfile "funcargs"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/gcore-buffer-overflow.exp
b/gdb/testsuite/gdb.base/gcore-buffer-overflow.exp
index
a8c565a
..
7736bb8
100644
(file)
--- a/
gdb/testsuite/gdb.base/gcore-buffer-overflow.exp
+++ b/
gdb/testsuite/gdb.base/gcore-buffer-overflow.exp
@@
-15,10
+15,6
@@
# Test GDB's internal buffers safety for the GCORE command.
# Test GDB's internal buffers safety for the GCORE command.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "gcore-buffer-overflow"
set srcfile ${testfile}.c
set testfile "gcore-buffer-overflow"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/gcore.exp
b/gdb/testsuite/gdb.base/gcore.exp
index
8b220d6
..
faa8fa7
100644
(file)
--- a/
gdb/testsuite/gdb.base/gcore.exp
+++ b/
gdb/testsuite/gdb.base/gcore.exp
@@
-16,10
+16,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This is a test for the gdb command "generate-core-file".
# This file was written by Michael Snyder (msnyder@redhat.com)
# This is a test for the gdb command "generate-core-file".
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "gcore"
set srcfile ${testfile}.c
set testfile "gcore"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/gdb1056.exp
b/gdb/testsuite/gdb.base/gdb1056.exp
index
fce0d87
..
5c46ed6
100644
(file)
--- a/
gdb/testsuite/gdb.base/gdb1056.exp
+++ b/
gdb/testsuite/gdb.base/gdb1056.exp
@@
-16,10
+16,6
@@
# Test for PR gdb/1056.
# 2003-10-18 Michael Chastain <mec@shout.net>
# Test for PR gdb/1056.
# 2003-10-18 Michael Chastain <mec@shout.net>
-if $tracelevel then {
- strace $tracelevel
-}
-
# test SIGFPE (such as division by 0) inside gdb itself
# test SIGFPE (such as division by 0) inside gdb itself
diff --git
a/gdb/testsuite/gdb.base/gdb1090.exp
b/gdb/testsuite/gdb.base/gdb1090.exp
index
59b36b9
..
f9a2b26
100644
(file)
--- a/
gdb/testsuite/gdb.base/gdb1090.exp
+++ b/
gdb/testsuite/gdb.base/gdb1090.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/gdb11530.exp
b/gdb/testsuite/gdb.base/gdb11530.exp
index
705b4f4
..
ba222c2
100644
(file)
--- a/
gdb/testsuite/gdb.base/gdb11530.exp
+++ b/
gdb/testsuite/gdb.base/gdb11530.exp
@@
-18,10
+18,6
@@
# Test GDB bug report 11530.
# This is a problem related unnamed unions.
# Test GDB bug report 11530.
# This is a problem related unnamed unions.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "gdb11530"
set binfile ${testfile}${EXEEXT}
set testfile "gdb11530"
set binfile ${testfile}${EXEEXT}
diff --git
a/gdb/testsuite/gdb.base/gdb11531.exp
b/gdb/testsuite/gdb.base/gdb11531.exp
index
ab3a77b
..
4f5b89c
100644
(file)
--- a/
gdb/testsuite/gdb.base/gdb11531.exp
+++ b/
gdb/testsuite/gdb.base/gdb11531.exp
@@
-19,10
+19,6
@@
# This is a problem related to CANNOT_STEP_HW_WATCHPOINTS macro.
# It affects Solaris native targets.
# This is a problem related to CANNOT_STEP_HW_WATCHPOINTS macro.
# It affects Solaris native targets.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "gdb11531"
set testfile "gdb11531"
diff --git
a/gdb/testsuite/gdb.base/gdb1250.exp
b/gdb/testsuite/gdb.base/gdb1250.exp
index
0d36b6e
..
ef1e067
100644
(file)
--- a/
gdb/testsuite/gdb.base/gdb1250.exp
+++ b/
gdb/testsuite/gdb.base/gdb1250.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/gdb1555.exp
b/gdb/testsuite/gdb.base/gdb1555.exp
index
be3aa75
..
11bed5d
100644
(file)
--- a/
gdb/testsuite/gdb.base/gdb1555.exp
+++ b/
gdb/testsuite/gdb.base/gdb1555.exp
@@
-17,10
+17,6
@@
# a shared library (PR gdb/1555, was PR shlib/1280, shlib/1237).
# Tested on ppc-yellowdog-linux (Yellow Dog Linux 3.0 3.2.2-2a)
# a shared library (PR gdb/1555, was PR shlib/1280, shlib/1237).
# Tested on ppc-yellowdog-linux (Yellow Dog Linux 3.0 3.2.2-2a)
-if $tracelevel then {
- strace $tracelevel
-}
-
if {[skip_shlib_tests]} {
return 0
}
if {[skip_shlib_tests]} {
return 0
}
diff --git
a/gdb/testsuite/gdb.base/gdbvars.exp
b/gdb/testsuite/gdb.base/gdbvars.exp
index
72935d8
..
0499f6c
100644
(file)
--- a/
gdb/testsuite/gdb.base/gdbvars.exp
+++ b/
gdb/testsuite/gdb.base/gdbvars.exp
@@
-15,10
+15,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "gdbvars"
set srcfile ${testfile}.c
set testfile "gdbvars"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/gnu_vector.exp
b/gdb/testsuite/gdb.base/gnu_vector.exp
index
d052b58
..
a1c1253
100644
(file)
--- a/
gdb/testsuite/gdb.base/gnu_vector.exp
+++ b/
gdb/testsuite/gdb.base/gnu_vector.exp
@@
-18,10
+18,6
@@
# Tests GDBs support for GNU vectors.
# http://gcc.gnu.org/onlinedocs/gcc/Vector-Extensions.html
# Tests GDBs support for GNU vectors.
# http://gcc.gnu.org/onlinedocs/gcc/Vector-Extensions.html
-if $tracelevel {
- strace $tracelevel
-}
-
set testfile "gnu_vector"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "gnu_vector"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/hashline1.exp
b/gdb/testsuite/gdb.base/hashline1.exp
index
36ca8b2
..
d07f604
100644
(file)
--- a/
gdb/testsuite/gdb.base/hashline1.exp
+++ b/
gdb/testsuite/gdb.base/hashline1.exp
@@
-18,10
+18,6
@@
# Test loading of line number information with absolute path in #line,
# PR symtab/9465.
# Test loading of line number information with absolute path in #line,
# PR symtab/9465.
-if $tracelevel then {
- strace $tracelevel
-}
-
# srcfile is in objdir because we need to machine generate it in order
# to get the correct path in the #line directive.
# srcfile is in objdir because we need to machine generate it in order
# to get the correct path in the #line directive.
diff --git
a/gdb/testsuite/gdb.base/hashline2.exp
b/gdb/testsuite/gdb.base/hashline2.exp
index
1042fd4
..
2edde40
100644
(file)
--- a/
gdb/testsuite/gdb.base/hashline2.exp
+++ b/
gdb/testsuite/gdb.base/hashline2.exp
@@
-18,10
+18,6
@@
# Test loading of line number information with an absolute path with extra
# /'s in #line, PR symtab/9465.
# Test loading of line number information with an absolute path with extra
# /'s in #line, PR symtab/9465.
-if $tracelevel then {
- strace $tracelevel
-}
-
# srcfile is in objdir because we need to machine generate it in order
# to get the correct path in the #line directive.
# srcfile is in objdir because we need to machine generate it in order
# to get the correct path in the #line directive.
diff --git
a/gdb/testsuite/gdb.base/hashline3.exp
b/gdb/testsuite/gdb.base/hashline3.exp
index
99e2a23
..
e471e51
100644
(file)
--- a/
gdb/testsuite/gdb.base/hashline3.exp
+++ b/
gdb/testsuite/gdb.base/hashline3.exp
@@
-18,10
+18,6
@@
# Test loading of line number information with relative path in #line,
# PR symtab/9465.
# Test loading of line number information with relative path in #line,
# PR symtab/9465.
-if $tracelevel then {
- strace $tracelevel
-}
-
# srcfile is in objdir because we need to machine generate it in order
# to get the correct path in the #line directive.
# srcfile is in objdir because we need to machine generate it in order
# to get the correct path in the #line directive.
diff --git
a/gdb/testsuite/gdb.base/huge.exp
b/gdb/testsuite/gdb.base/huge.exp
index
7196116
..
78ae6cd
100644
(file)
--- a/
gdb/testsuite/gdb.base/huge.exp
+++ b/
gdb/testsuite/gdb.base/huge.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
# Define if you want to skip this test
# (could be very time-consuming on remote targets with slow connection).
# Define if you want to skip this test
# (could be very time-consuming on remote targets with slow connection).
diff --git
a/gdb/testsuite/gdb.base/ifelse.exp
b/gdb/testsuite/gdb.base/ifelse.exp
index
d452c5d
..
cb9f508
100644
(file)
--- a/
gdb/testsuite/gdb.base/ifelse.exp
+++ b/
gdb/testsuite/gdb.base/ifelse.exp
@@
-16,10
+16,6
@@
# This test checks that the if .. else .. end construct works and may
# contain empty bodies without crashing.
# This test checks that the if .. else .. end construct works and may
# contain empty bodies without crashing.
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.base/info-proc.exp
b/gdb/testsuite/gdb.base/info-proc.exp
index
4280abd
..
fbd62f9
100644
(file)
--- a/
gdb/testsuite/gdb.base/info-proc.exp
+++ b/
gdb/testsuite/gdb.base/info-proc.exp
@@
-16,10
+16,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This is a test for the gdb command "info proc"
# This file was written by Michael Snyder (msnyder@redhat.com)
# This is a test for the gdb command "info proc"
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [is_remote target] } then {
continue
}
if { [is_remote target] } then {
continue
}
diff --git
a/gdb/testsuite/gdb.base/info-target.exp
b/gdb/testsuite/gdb.base/info-target.exp
index
5817535
..
84ac7e6
100644
(file)
--- a/
gdb/testsuite/gdb.base/info-target.exp
+++ b/
gdb/testsuite/gdb.base/info-target.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/>.
# 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
-}
-
set testfile info-target
if { [prepare_for_testing ${testfile}.exp $testfile start.c] } {
set testfile info-target
if { [prepare_for_testing ${testfile}.exp $testfile start.c] } {
diff --git
a/gdb/testsuite/gdb.base/interp.exp
b/gdb/testsuite/gdb.base/interp.exp
index
6a7f7c8
..
621cbd0
100644
(file)
--- a/
gdb/testsuite/gdb.base/interp.exp
+++ b/
gdb/testsuite/gdb.base/interp.exp
@@
-15,10
+15,6
@@
# interp.exp Test interpreter-exec command
# interp.exp Test interpreter-exec command
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "interp"
if { [prepare_for_testing ${testfile}.exp ${testfile} ${testfile}.c {debug}] } {
set testfile "interp"
if { [prepare_for_testing ${testfile}.exp ${testfile} ${testfile}.c {debug}] } {
diff --git
a/gdb/testsuite/gdb.base/interrupt.exp
b/gdb/testsuite/gdb.base/interrupt.exp
index
6b3e0f5
..
06846ec
100644
(file)
--- a/
gdb/testsuite/gdb.base/interrupt.exp
+++ b/
gdb/testsuite/gdb.base/interrupt.exp
@@
-23,10
+23,6
@@
if [target_info exists gdb,noinferiorio] {
return
}
return
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile interrupt
set srcfile ${testfile}.c
set testfile interrupt
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/jit-so.exp
b/gdb/testsuite/gdb.base/jit-so.exp
index
8807a65
..
b28f903
100644
(file)
--- a/
gdb/testsuite/gdb.base/jit-so.exp
+++ b/
gdb/testsuite/gdb.base/jit-so.exp
@@
-16,10
+16,6
@@
# The same tests as in jit.exp, but loading JITer itself from a shared
# library.
# The same tests as in jit.exp, but loading JITer itself from a shared
# library.
-if $tracelevel {
- strace $tracelevel
-}
-
if {[skip_shlib_tests]} {
untested jit-so.exp
return -1
if {[skip_shlib_tests]} {
untested jit-so.exp
return -1
diff --git
a/gdb/testsuite/gdb.base/jit.exp
b/gdb/testsuite/gdb.base/jit.exp
index
eba8116
..
a1aa351
100644
(file)
--- a/
gdb/testsuite/gdb.base/jit.exp
+++ b/
gdb/testsuite/gdb.base/jit.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/>.
# 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 {
- strace $tracelevel
-}
-
if {[skip_shlib_tests]} {
untested jit.exp
return -1
if {[skip_shlib_tests]} {
untested jit.exp
return -1
diff --git
a/gdb/testsuite/gdb.base/jump.exp
b/gdb/testsuite/gdb.base/jump.exp
index
3ccc334
..
a5577e2
100644
(file)
--- a/
gdb/testsuite/gdb.base/jump.exp
+++ b/
gdb/testsuite/gdb.base/jump.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/>. */
# 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
- }
-
clear_xfail "*-*-*"
clear_xfail "*-*-*"
diff --git
a/gdb/testsuite/gdb.base/label.exp
b/gdb/testsuite/gdb.base/label.exp
index
fa55c11
..
c511cb9
100644
(file)
--- a/
gdb/testsuite/gdb.base/label.exp
+++ b/
gdb/testsuite/gdb.base/label.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/>.
# 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
-}
-
if [is_remote target] then {
return 0
if [is_remote target] then {
return 0
diff --git
a/gdb/testsuite/gdb.base/langs.exp
b/gdb/testsuite/gdb.base/langs.exp
index
7c24980
..
e041b01
100644
(file)
--- a/
gdb/testsuite/gdb.base/langs.exp
+++ b/
gdb/testsuite/gdb.base/langs.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/>.
# 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
-}
-
set testfile langs
set binfile ${objdir}/${subdir}/${testfile}
set testfile langs
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/lineinc.exp
b/gdb/testsuite/gdb.base/lineinc.exp
index
0edbfe0
..
79f9091
100644
(file)
--- a/
gdb/testsuite/gdb.base/lineinc.exp
+++ b/
gdb/testsuite/gdb.base/lineinc.exp
@@
-77,10
+77,6
@@
# sorted in ascending order; GDB would get an internal error trying to
# read the above debugging info.
# sorted in ascending order; GDB would get an internal error trying to
# read the above debugging info.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "lineinc"
set binfile ${objdir}/${subdir}/${testfile}
set testfile "lineinc"
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/list.exp
b/gdb/testsuite/gdb.base/list.exp
index
f87c17b
..
d1358c3
100644
(file)
--- a/
gdb/testsuite/gdb.base/list.exp
+++ b/
gdb/testsuite/gdb.base/list.exp
@@
-16,10
+16,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "list"
set binfile ${objdir}/${subdir}/${testfile}
set testfile "list"
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/logical.exp
b/gdb/testsuite/gdb.base/logical.exp
index
1c5bcf3
..
0df5555
100644
(file)
--- a/
gdb/testsuite/gdb.base/logical.exp
+++ b/
gdb/testsuite/gdb.base/logical.exp
@@
-21,10
+21,6
@@
# precedence with integer type variables
# precedence with integer type variables
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/long_long.exp
b/gdb/testsuite/gdb.base/long_long.exp
index
fd33bfd
..
a699d0b
100644
(file)
--- a/
gdb/testsuite/gdb.base/long_long.exp
+++ b/
gdb/testsuite/gdb.base/long_long.exp
@@
-18,10
+18,6
@@
# long_long.exp Test printing of 64-bit things in 32-bit gdb.
# Also test differnet kinds of formats.
#
# long_long.exp Test printing of 64-bit things in 32-bit gdb.
# Also test differnet kinds of formats.
#
-if $tracelevel then {
- strace $tracelevel
-}
-
if [target_info exists no_long_long] {
return 0
}
if [target_info exists no_long_long] {
return 0
}
diff --git
a/gdb/testsuite/gdb.base/longjmp.exp
b/gdb/testsuite/gdb.base/longjmp.exp
index
9b314ce
..
d5af26e
100644
(file)
--- a/
gdb/testsuite/gdb.base/longjmp.exp
+++ b/
gdb/testsuite/gdb.base/longjmp.exp
@@
-17,10
+17,6
@@
# Test support for stepping over longjmp.
#
# Test support for stepping over longjmp.
#
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "longjmp"
set srcfile ${testfile}.c
set testfile "longjmp"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/macscp.exp
b/gdb/testsuite/gdb.base/macscp.exp
index
aed9b8d
..
fa2173a
100644
(file)
--- a/
gdb/testsuite/gdb.base/macscp.exp
+++ b/
gdb/testsuite/gdb.base/macscp.exp
@@
-14,10
+14,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/>.
# 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
-}
-
set srcfile macscp1.c
set testfile "macscp"
set srcfile macscp1.c
set testfile "macscp"
diff --git
a/gdb/testsuite/gdb.base/maint.exp
b/gdb/testsuite/gdb.base/maint.exp
index
1d0f419
..
1c99150
100644
(file)
--- a/
gdb/testsuite/gdb.base/maint.exp
+++ b/
gdb/testsuite/gdb.base/maint.exp
@@
-47,10
+47,6
@@
-if $tracelevel then {
- strace $tracelevel
- }
-
set testfile "break"
set srcfile ${testfile}.c
set srcfile1 ${testfile}1.c
set testfile "break"
set srcfile ${testfile}.c
set srcfile1 ${testfile}1.c
diff --git
a/gdb/testsuite/gdb.base/memattr.exp
b/gdb/testsuite/gdb.base/memattr.exp
index
42a20e8
..
4065808
100644
(file)
--- a/
gdb/testsuite/gdb.base/memattr.exp
+++ b/
gdb/testsuite/gdb.base/memattr.exp
@@
-17,10
+17,6
@@
# Test the memory attribute commands.
# Test the memory attribute commands.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "memattr"
set srcfile ${testfile}.c
set testfile "memattr"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/mips_pro.exp
b/gdb/testsuite/gdb.base/mips_pro.exp
index
e12ecae
..
8e963c1
100644
(file)
--- a/
gdb/testsuite/gdb.base/mips_pro.exp
+++ b/
gdb/testsuite/gdb.base/mips_pro.exp
@@
-14,10
+14,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/>.
# 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
-}
-
set testfile mips_pro
set srcfile ${testfile}.c
set testfile mips_pro
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/miscexprs.exp
b/gdb/testsuite/gdb.base/miscexprs.exp
index
5eec2f6
..
caafe05
100644
(file)
--- a/
gdb/testsuite/gdb.base/miscexprs.exp
+++ b/
gdb/testsuite/gdb.base/miscexprs.exp
@@
-22,10
+22,6
@@
# with elementary types
#
# with elementary types
#
-if $tracelevel then {
- strace $tracelevel
- }
-
# By default, the datastructures are allocated on the stack. For targets
# with very small stack, that will not work. In that case, just set
# storage to `-DSTORAGE=static' which changes the datastructures to be
# By default, the datastructures are allocated on the stack. For targets
# with very small stack, that will not work. In that case, just set
# storage to `-DSTORAGE=static' which changes the datastructures to be
diff --git
a/gdb/testsuite/gdb.base/multi-forks.exp
b/gdb/testsuite/gdb.base/multi-forks.exp
index
fa98cf3
..
4b08b66
100644
(file)
--- a/
gdb/testsuite/gdb.base/multi-forks.exp
+++ b/
gdb/testsuite/gdb.base/multi-forks.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/>.
# 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
- }
-
if { [is_remote target] || ![isnative] } then {
continue
}
if { [is_remote target] || ![isnative] } then {
continue
}
diff --git
a/gdb/testsuite/gdb.base/nodebug.exp
b/gdb/testsuite/gdb.base/nodebug.exp
index
477c01b
..
344a804
100644
(file)
--- a/
gdb/testsuite/gdb.base/nodebug.exp
+++ b/
gdb/testsuite/gdb.base/nodebug.exp
@@
-16,10
+16,6
@@
# Test that things still (sort of) work when compiled without -g.
# Test that things still (sort of) work when compiled without -g.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile nodebug
set srcfile $srcdir/$subdir/$testfile.c
set testfile nodebug
set srcfile $srcdir/$subdir/$testfile.c
diff --git
a/gdb/testsuite/gdb.base/nofield.exp
b/gdb/testsuite/gdb.base/nofield.exp
index
8602de9
..
4c44f8e
100644
(file)
--- a/
gdb/testsuite/gdb.base/nofield.exp
+++ b/
gdb/testsuite/gdb.base/nofield.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/>.
# 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 {
- strace $tracelevel
-}
-
set testfile "nofield"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "nofield"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/opaque.exp
b/gdb/testsuite/gdb.base/opaque.exp
index
484f1a6
..
b7ad265
100644
(file)
--- a/
gdb/testsuite/gdb.base/opaque.exp
+++ b/
gdb/testsuite/gdb.base/opaque.exp
@@
-16,10
+16,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "opaque"
set binfile ${objdir}/${subdir}/opaque
set testfile "opaque"
set binfile ${objdir}/${subdir}/opaque
diff --git
a/gdb/testsuite/gdb.base/overlays.exp
b/gdb/testsuite/gdb.base/overlays.exp
index
d1405ac
..
a017661
100644
(file)
--- a/
gdb/testsuite/gdb.base/overlays.exp
+++ b/
gdb/testsuite/gdb.base/overlays.exp
@@
-16,10
+16,6
@@
#
# This file was written by Michael Snyder (msnyder@cygnus.com)
#
# This file was written by Michael Snyder (msnyder@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/page.exp
b/gdb/testsuite/gdb.base/page.exp
index
5e72126
..
0629807
100644
(file)
--- a/
gdb/testsuite/gdb.base/page.exp
+++ b/
gdb/testsuite/gdb.base/page.exp
@@
-16,10
+16,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.base/pc-fp.exp
b/gdb/testsuite/gdb.base/pc-fp.exp
index
3a88431
..
9d74eef
100644
(file)
--- a/
gdb/testsuite/gdb.base/pc-fp.exp
+++ b/
gdb/testsuite/gdb.base/pc-fp.exp
@@
-20,10
+20,6
@@
# aliases. If the ISA doesn't provide any equivalent registers, then
# GDB will provide registers that map onto the frame's PC and FP.
# aliases. If the ISA doesn't provide any equivalent registers, then
# GDB will provide registers that map onto the frame's PC and FP.
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/pending.exp
b/gdb/testsuite/gdb.base/pending.exp
index
53184b0
..
7c0c586
100644
(file)
--- a/
gdb/testsuite/gdb.base/pending.exp
+++ b/
gdb/testsuite/gdb.base/pending.exp
@@
-15,10
+15,6
@@
# This file was created by Jeff Johnston. (jjohnstn@redhat.com)
# This file was created by Jeff Johnston. (jjohnstn@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/pointers.exp
b/gdb/testsuite/gdb.base/pointers.exp
index
d5868c4
..
bd29581
100644
(file)
--- a/
gdb/testsuite/gdb.base/pointers.exp
+++ b/
gdb/testsuite/gdb.base/pointers.exp
@@
-21,10
+21,6
@@
# with integer type variables and pointers to integers
#
# with integer type variables and pointers to integers
#
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/pr11022.exp
b/gdb/testsuite/gdb.base/pr11022.exp
index
8078eac
..
c11857d
100644
(file)
--- a/
gdb/testsuite/gdb.base/pr11022.exp
+++ b/
gdb/testsuite/gdb.base/pr11022.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/>.
# 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
-}
-
if {[skip_hw_watchpoint_tests]} {
return 0
}
if {[skip_hw_watchpoint_tests]} {
return 0
}
diff --git
a/gdb/testsuite/gdb.base/prelink.exp
b/gdb/testsuite/gdb.base/prelink.exp
index
dbb9bbc
..
71196bd
100644
(file)
--- a/
gdb/testsuite/gdb.base/prelink.exp
+++ b/
gdb/testsuite/gdb.base/prelink.exp
@@
-18,10
+18,6
@@
# This file was written by Alexandre Oliva <aoliva@redhat.com>
# This file was written by Alexandre Oliva <aoliva@redhat.com>
-if $tracelevel then {
- strace $tracelevel
- }
-
if { ![isnative] || [is_remote host] || [skip_shlib_tests]} {
return
if { ![isnative] || [is_remote host] || [skip_shlib_tests]} {
return
diff --git
a/gdb/testsuite/gdb.base/printcmds.exp
b/gdb/testsuite/gdb.base/printcmds.exp
index
d647ca8
..
c932f94
100644
(file)
--- a/
gdb/testsuite/gdb.base/printcmds.exp
+++ b/
gdb/testsuite/gdb.base/printcmds.exp
@@
-21,10
+21,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "printcmds"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "printcmds"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/psymtab.exp
b/gdb/testsuite/gdb.base/psymtab.exp
index
2606dd2
..
06674b1
100644
(file)
--- a/
gdb/testsuite/gdb.base/psymtab.exp
+++ b/
gdb/testsuite/gdb.base/psymtab.exp
@@
-19,10
+19,6
@@
# are working properly. If multiple tests are added, make sure that
# you exit and restart GDB between tests.
# are working properly. If multiple tests are added, make sure that
# you exit and restart GDB between tests.
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/ptr-typedef.exp
b/gdb/testsuite/gdb.base/ptr-typedef.exp
index
c69dcf4
..
674ce45
100644
(file)
--- a/
gdb/testsuite/gdb.base/ptr-typedef.exp
+++ b/
gdb/testsuite/gdb.base/ptr-typedef.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/>.
# 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
-}
-
set testfile ptr-typedef
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile ptr-typedef
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/ptype.exp
b/gdb/testsuite/gdb.base/ptype.exp
index
ff71186
..
adb4cd4
100644
(file)
--- a/
gdb/testsuite/gdb.base/ptype.exp
+++ b/
gdb/testsuite/gdb.base/ptype.exp
@@
-16,10
+16,6
@@
# This file was written by Rob Savoye. (rob@cygnus.com)
# This file was written by Rob Savoye. (rob@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/radix.exp
b/gdb/testsuite/gdb.base/radix.exp
index
39ac713
..
758232d
100644
(file)
--- a/
gdb/testsuite/gdb.base/radix.exp
+++ b/
gdb/testsuite/gdb.base/radix.exp
@@
-17,10
+17,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# And rewritten by Michael Chastain (mec.gnu@mindspring.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
# And rewritten by Michael Chastain (mec.gnu@mindspring.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
# Start with a fresh gdb.
# Start with a fresh gdb.
diff --git
a/gdb/testsuite/gdb.base/readline.exp
b/gdb/testsuite/gdb.base/readline.exp
index
e7538a4
..
2445aec
100644
(file)
--- a/
gdb/testsuite/gdb.base/readline.exp
+++ b/
gdb/testsuite/gdb.base/readline.exp
@@
-142,10
+142,6
@@
proc operate_and_get_next {name args} {
}
}
-if $tracelevel {
- strace $tracelevel
-}
-
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
diff --git
a/gdb/testsuite/gdb.base/recurse.exp
b/gdb/testsuite/gdb.base/recurse.exp
index
0dadc78
..
cbc9871
100644
(file)
--- a/
gdb/testsuite/gdb.base/recurse.exp
+++ b/
gdb/testsuite/gdb.base/recurse.exp
@@
-16,10
+16,6
@@
# This file was written by Jeff Law. (law@cs.utah.edu)
# This file was written by Jeff Law. (law@cs.utah.edu)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "recurse"
set srcfile ${testfile}.c
set testfile "recurse"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/regs.exp
b/gdb/testsuite/gdb.base/regs.exp
index
3f046bc
..
320b3a3
100644
(file)
--- a/
gdb/testsuite/gdb.base/regs.exp
+++ b/
gdb/testsuite/gdb.base/regs.exp
@@
-22,10
+22,6
@@
# and writing of registers in a real program, although some care
# would be required in the writing of the tests.
# and writing of registers in a real program, although some care
# would be required in the writing of the tests.
-if $tracelevel then {
- strace $tracelevel
- }
-
# These tests exercise IDT-specific MIPS registers for several
# different processor models.
# These tests exercise IDT-specific MIPS registers for several
# different processor models.
diff --git
a/gdb/testsuite/gdb.base/relational.exp
b/gdb/testsuite/gdb.base/relational.exp
index
26b77d7
..
c1ee625
100644
(file)
--- a/
gdb/testsuite/gdb.base/relational.exp
+++ b/
gdb/testsuite/gdb.base/relational.exp
@@
-21,10
+21,6
@@
# with integer type variables
#
# with integer type variables
#
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/relativedebug.exp
b/gdb/testsuite/gdb.base/relativedebug.exp
index
b37689e
..
4d570c0
100644
(file)
--- a/
gdb/testsuite/gdb.base/relativedebug.exp
+++ b/
gdb/testsuite/gdb.base/relativedebug.exp
@@
-18,10
+18,6
@@
if [target_info exists gdb,nosignals] {
continue
}
continue
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile relativedebug
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile relativedebug
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/relocate.exp
b/gdb/testsuite/gdb.base/relocate.exp
index
5cb07ce
..
960597e
100644
(file)
--- a/
gdb/testsuite/gdb.base/relocate.exp
+++ b/
gdb/testsuite/gdb.base/relocate.exp
@@
-16,10
+16,6
@@
# relocate.exp -- Expect script to test loading symbols from unrelocated
# object files.
# relocate.exp -- Expect script to test loading symbols from unrelocated
# object files.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile relocate
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}.o
set testfile relocate
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}.o
diff --git
a/gdb/testsuite/gdb.base/remote.exp
b/gdb/testsuite/gdb.base/remote.exp
index
c9fe998
..
8f50787
100644
(file)
--- a/
gdb/testsuite/gdb.base/remote.exp
+++ b/
gdb/testsuite/gdb.base/remote.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/>.
# 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
-}
-
# test only on a remote target board
# test only on a remote target board
diff --git
a/gdb/testsuite/gdb.base/remotetimeout.exp
b/gdb/testsuite/gdb.base/remotetimeout.exp
index
9549dbd
..
d51f39b
100644
(file)
--- a/
gdb/testsuite/gdb.base/remotetimeout.exp
+++ b/
gdb/testsuite/gdb.base/remotetimeout.exp
@@
-18,10
+18,6
@@
# This is a test for the gdb invocation option -l.
# This is a test for the gdb invocation option -l.
-if $tracelevel then {
- strace $tracelevel
-}
-
global GDBFLAGS
global GDBFLAGS
diff --git
a/gdb/testsuite/gdb.base/reread.exp
b/gdb/testsuite/gdb.base/reread.exp
index
9b6bd11
..
2a0929f
100644
(file)
--- a/
gdb/testsuite/gdb.base/reread.exp
+++ b/
gdb/testsuite/gdb.base/reread.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/>.
# 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
-}
-
set prototypes 1
# build the first test case
set prototypes 1
# build the first test case
diff --git
a/gdb/testsuite/gdb.base/restore.exp
b/gdb/testsuite/gdb.base/restore.exp
index
68ba2fe
..
e9b950c
100644
(file)
--- a/
gdb/testsuite/gdb.base/restore.exp
+++ b/
gdb/testsuite/gdb.base/restore.exp
@@
-21,10
+21,6
@@
# This file was written by Jim Blandy <jimb@cygnus.com>, with
# fragments borrowed from return.exp.
# This file was written by Jim Blandy <jimb@cygnus.com>, with
# fragments borrowed from return.exp.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "restore"
set srcfile ${testfile}.c
set testfile "restore"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/return2.exp
b/gdb/testsuite/gdb.base/return2.exp
index
22a0f57
..
8c7ea15
100644
(file)
--- a/
gdb/testsuite/gdb.base/return2.exp
+++ b/
gdb/testsuite/gdb.base/return2.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "return2"
set srcfile ${testfile}.c
set testfile "return2"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/savedregs.exp
b/gdb/testsuite/gdb.base/savedregs.exp
index
8837e1f
..
394afc9
100644
(file)
--- a/
gdb/testsuite/gdb.base/savedregs.exp
+++ b/
gdb/testsuite/gdb.base/savedregs.exp
@@
-29,10
+29,6
@@
if [target_info exists gdb,nosignals] {
continue
}
continue
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile savedregs
set srcfile ${testfile}.c
set testfile savedregs
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/scope.exp
b/gdb/testsuite/gdb.base/scope.exp
index
7059226
..
a86e02d
100644
(file)
--- a/
gdb/testsuite/gdb.base/scope.exp
+++ b/
gdb/testsuite/gdb.base/scope.exp
@@
-16,10
+16,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "scope"
set binfile ${objdir}/${subdir}/${testfile}
set testfile "scope"
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/sect-cmd.exp
b/gdb/testsuite/gdb.base/sect-cmd.exp
index
bd84473
..
8aeabe8
100644
(file)
--- a/
gdb/testsuite/gdb.base/sect-cmd.exp
+++ b/
gdb/testsuite/gdb.base/sect-cmd.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/>. */
# 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
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/sep.exp
b/gdb/testsuite/gdb.base/sep.exp
index
7b8d203
..
eb0ad2b
100644
(file)
--- a/
gdb/testsuite/gdb.base/sep.exp
+++ b/
gdb/testsuite/gdb.base/sep.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/>.
# 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
-}
-
set testfile "sep"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "sep"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/sepdebug.exp
b/gdb/testsuite/gdb.base/sepdebug.exp
index
5ddf4aa
..
5341bc9
100644
(file)
--- a/
gdb/testsuite/gdb.base/sepdebug.exp
+++ b/
gdb/testsuite/gdb.base/sepdebug.exp
@@
-26,10
+26,6
@@
# ".debug-id/ab/cdef.debug" file.
# ".debug-id/ab/cdef.debug" file.
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/sepsymtab.exp
b/gdb/testsuite/gdb.base/sepsymtab.exp
index
80bd438
..
2104739
100644
(file)
--- a/
gdb/testsuite/gdb.base/sepsymtab.exp
+++ b/
gdb/testsuite/gdb.base/sepsymtab.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/>.
# 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
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/set-lang-auto.exp
b/gdb/testsuite/gdb.base/set-lang-auto.exp
index
90f2645
..
79b97bb
100644
(file)
--- a/
gdb/testsuite/gdb.base/set-lang-auto.exp
+++ b/
gdb/testsuite/gdb.base/set-lang-auto.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/>.
# 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
-}
-
set testfile start
set srcfile ${testfile}.c
set testfile start
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/setshow.exp
b/gdb/testsuite/gdb.base/setshow.exp
index
029de07
..
a24fbba
100644
(file)
--- a/
gdb/testsuite/gdb.base/setshow.exp
+++ b/
gdb/testsuite/gdb.base/setshow.exp
@@
-16,10
+16,6
@@
# This file was written by Michael Snyder (msnyder@cygnus.com)
# This file was written by Michael Snyder (msnyder@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "setshow"
set srcfile ${testfile}.c
set testfile "setshow"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/setvar.exp
b/gdb/testsuite/gdb.base/setvar.exp
index
5594d39
..
5b597ed
100644
(file)
--- a/
gdb/testsuite/gdb.base/setvar.exp
+++ b/
gdb/testsuite/gdb.base/setvar.exp
@@
-21,10
+21,6
@@
# This file was written by Rob Savoye. (rob@cygnus.com)
# This file was written by Rob Savoye. (rob@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/shlib-call.exp
b/gdb/testsuite/gdb.base/shlib-call.exp
index
c8a5745
..
9b3e251
100644
(file)
--- a/
gdb/testsuite/gdb.base/shlib-call.exp
+++ b/
gdb/testsuite/gdb.base/shlib-call.exp
@@
-28,10
+28,6
@@
#prop lib shr1.sl
#prop lib shr2.sl
#prop lib shr1.sl
#prop lib shr2.sl
-if $tracelevel then {
- strace $tracelevel
-}
-
if {[skip_shlib_tests]} {
return 0
if {[skip_shlib_tests]} {
return 0
diff --git
a/gdb/testsuite/gdb.base/shreloc.exp
b/gdb/testsuite/gdb.base/shreloc.exp
index
93f3c3d
..
559a0a2
100644
(file)
--- a/
gdb/testsuite/gdb.base/shreloc.exp
+++ b/
gdb/testsuite/gdb.base/shreloc.exp
@@
-23,10
+23,6
@@
if {[skip_shlib_tests]} {
return 0
}
return 0
}
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# This file uses shreloc.c, shreloc1.c and shreloc2.c
#
#
# This file uses shreloc.c, shreloc1.c and shreloc2.c
#
diff --git
a/gdb/testsuite/gdb.base/sigall.exp
b/gdb/testsuite/gdb.base/sigall.exp
index
e8d33d8
..
1f2bab7
100644
(file)
--- a/
gdb/testsuite/gdb.base/sigall.exp
+++ b/
gdb/testsuite/gdb.base/sigall.exp
@@
-18,10
+18,6
@@
if [target_info exists gdb,nosignals] {
continue
}
continue
}
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.base/sigaltstack.exp
b/gdb/testsuite/gdb.base/sigaltstack.exp
index
75e4d98
..
854f151
100644
(file)
--- a/
gdb/testsuite/gdb.base/sigaltstack.exp
+++ b/
gdb/testsuite/gdb.base/sigaltstack.exp
@@
-27,10
+27,6
@@
if [target_info exists gdb,nosignals] {
continue
}
continue
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile sigaltstack
set srcfile ${testfile}.c
set testfile sigaltstack
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/sigbpt.exp
b/gdb/testsuite/gdb.base/sigbpt.exp
index
d79941e
..
ebe0a17
100644
(file)
--- a/
gdb/testsuite/gdb.base/sigbpt.exp
+++ b/
gdb/testsuite/gdb.base/sigbpt.exp
@@
-33,10
+33,6
@@
if [target_info exists gdb,nosignals] {
continue
}
continue
}
-if $tracelevel {
- strace $tracelevel
-}
-
set testfile "sigbpt"
set srcfile ${testfile}.c
set testfile "sigbpt"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/siginfo-addr.exp
b/gdb/testsuite/gdb.base/siginfo-addr.exp
index
a56d136
..
d68d310
100644
(file)
--- a/
gdb/testsuite/gdb.base/siginfo-addr.exp
+++ b/
gdb/testsuite/gdb.base/siginfo-addr.exp
@@
-30,10
+30,6
@@
if [gdb_skip_stdio_test "siginfo-addr.exp"] {
continue
}
continue
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile siginfo-addr
set srcfile ${testfile}.c
set testfile siginfo-addr
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/siginfo-obj.exp
b/gdb/testsuite/gdb.base/siginfo-obj.exp
index
3747400
..
9ca649d
100644
(file)
--- a/
gdb/testsuite/gdb.base/siginfo-obj.exp
+++ b/
gdb/testsuite/gdb.base/siginfo-obj.exp
@@
-33,10
+33,6
@@
if { ! [istarget "i?86-*-linux*"]
return
}
return
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile siginfo-obj
set srcfile ${testfile}.c
set testfile siginfo-obj
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/siginfo.exp
b/gdb/testsuite/gdb.base/siginfo.exp
index
bb4f0a4
..
f9bdf32
100644
(file)
--- a/
gdb/testsuite/gdb.base/siginfo.exp
+++ b/
gdb/testsuite/gdb.base/siginfo.exp
@@
-28,10
+28,6
@@
if [target_info exists gdb,nosignals] {
continue
}
continue
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile siginfo
set srcfile ${testfile}.c
set testfile siginfo
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/signals.exp
b/gdb/testsuite/gdb.base/signals.exp
index
a9e60ee
..
334b80e
100644
(file)
--- a/
gdb/testsuite/gdb.base/signals.exp
+++ b/
gdb/testsuite/gdb.base/signals.exp
@@
-19,10
+19,6
@@
if [target_info exists gdb,nosignals] {
continue
}
continue
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile signals
set srcfile ${testfile}.c
set testfile signals
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/signull.exp
b/gdb/testsuite/gdb.base/signull.exp
index
c76e153
..
9a59fb4
100644
(file)
--- a/
gdb/testsuite/gdb.base/signull.exp
+++ b/
gdb/testsuite/gdb.base/signull.exp
@@
-32,10
+32,6
@@
if [target_info exists gdb,nosignals] {
continue
}
continue
}
-if $tracelevel {
- strace $tracelevel
-}
-
set testfile "signull"
set srcfile ${testfile}.c
set testfile "signull"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/sigrepeat.exp
b/gdb/testsuite/gdb.base/sigrepeat.exp
index
77c51b3
..
546d194
100644
(file)
--- a/
gdb/testsuite/gdb.base/sigrepeat.exp
+++ b/
gdb/testsuite/gdb.base/sigrepeat.exp
@@
-24,10
+24,6
@@
if [target_info exists gdb,nosignals] {
continue
}
continue
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile sigrepeat
set srcfile ${testfile}.c
set testfile sigrepeat
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/sigstep.exp
b/gdb/testsuite/gdb.base/sigstep.exp
index
3768c88
..
fb290cd
100644
(file)
--- a/
gdb/testsuite/gdb.base/sigstep.exp
+++ b/
gdb/testsuite/gdb.base/sigstep.exp
@@
-26,10
+26,6
@@
if [target_info exists gdb,nosignals] {
continue
}
continue
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile sigstep
set srcfile ${testfile}.c
set testfile sigstep
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/sizeof.exp
b/gdb/testsuite/gdb.base/sizeof.exp
index
dcd0f65
..
a8b2970
100644
(file)
--- a/
gdb/testsuite/gdb.base/sizeof.exp
+++ b/
gdb/testsuite/gdb.base/sizeof.exp
@@
-20,10
+20,6
@@
if [target_info exists gdb,noinferiorio] {
continue
}
continue
}
-if $tracelevel {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/so-impl-ld.exp
b/gdb/testsuite/gdb.base/so-impl-ld.exp
index
d837508
..
ab36a9e
100644
(file)
--- a/
gdb/testsuite/gdb.base/so-impl-ld.exp
+++ b/
gdb/testsuite/gdb.base/so-impl-ld.exp
@@
-14,10
+14,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/>.
# 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
- }
-
if {[skip_shlib_tests]} {
return 0
if {[skip_shlib_tests]} {
return 0
diff --git
a/gdb/testsuite/gdb.base/so-indr-cl.exp
b/gdb/testsuite/gdb.base/so-indr-cl.exp
index
daf8ece
..
464f128
100644
(file)
--- a/
gdb/testsuite/gdb.base/so-indr-cl.exp
+++ b/
gdb/testsuite/gdb.base/so-indr-cl.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/>. */
# 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
- }
-
# are we on a target board
if ![isnative] then {
# are we on a target board
if ![isnative] then {
diff --git
a/gdb/testsuite/gdb.base/solib.exp
b/gdb/testsuite/gdb.base/solib.exp
index
a73dea6
..
78ad41c
100644
(file)
--- a/
gdb/testsuite/gdb.base/solib.exp
+++ b/
gdb/testsuite/gdb.base/solib.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/>. */
# 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
- }
-
# are we on a target board
if ![isnative] then {
# are we on a target board
if ![isnative] then {
diff --git
a/gdb/testsuite/gdb.base/source.exp
b/gdb/testsuite/gdb.base/source.exp
index
c8e8056
..
9e598d9
100644
(file)
--- a/
gdb/testsuite/gdb.base/source.exp
+++ b/
gdb/testsuite/gdb.base/source.exp
@@
-18,10
+18,6
@@
# Test GDB's "source" command - reads in a GDB script.
# Test GDB's "source" command - reads in a GDB script.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "structs"
set srcfile ${testfile}.c
set testfile "structs"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/stack-checking.exp
b/gdb/testsuite/gdb.base/stack-checking.exp
index
b09ba44
..
df82bc8
100644
(file)
--- a/
gdb/testsuite/gdb.base/stack-checking.exp
+++ b/
gdb/testsuite/gdb.base/stack-checking.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/>.
# 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
-}
-
set testfile "stack-checking"
set srcfile ${testfile}.c
set testfile "stack-checking"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/start.exp
b/gdb/testsuite/gdb.base/start.exp
index
8781d58
..
4d5a957
100644
(file)
--- a/
gdb/testsuite/gdb.base/start.exp
+++ b/
gdb/testsuite/gdb.base/start.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/>.
# 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
-}
-
set testfile start
set srcfile ${testfile}.c
set testfile start
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/step-break.exp
b/gdb/testsuite/gdb.base/step-break.exp
index
b24ad8e
..
c572f80
100644
(file)
--- a/
gdb/testsuite/gdb.base/step-break.exp
+++ b/
gdb/testsuite/gdb.base/step-break.exp
@@
-15,10
+15,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/>.
# 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
-}
-
set testfile step-break
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile step-break
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/step-bt.exp
b/gdb/testsuite/gdb.base/step-bt.exp
index
d849f03
..
8e5e248
100644
(file)
--- a/
gdb/testsuite/gdb.base/step-bt.exp
+++ b/
gdb/testsuite/gdb.base/step-bt.exp
@@
-16,10
+16,6
@@
# The intent of this testcase is to assure that backtrace works while
# single-stepping the instructions that prepare to call a function.
# The intent of this testcase is to assure that backtrace works while
# single-stepping the instructions that prepare to call a function.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile step-bt
set srcfile ${testfile}.c
set testfile step-bt
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/step-line.exp
b/gdb/testsuite/gdb.base/step-line.exp
index
1e55201
..
1966f4e
100644
(file)
--- a/
gdb/testsuite/gdb.base/step-line.exp
+++ b/
gdb/testsuite/gdb.base/step-line.exp
@@
-20,10
+20,6
@@
# step-line.exp -- Expect script to test stepping in files with
# #line directives.
# step-line.exp -- Expect script to test stepping in files with
# #line directives.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile step-line
set srcfile ${testfile}.c
set linefile ${testfile}.inp
set testfile step-line
set srcfile ${testfile}.c
set linefile ${testfile}.inp
diff --git
a/gdb/testsuite/gdb.base/step-test.exp
b/gdb/testsuite/gdb.base/step-test.exp
index
abb4a0a
..
e02174a
100644
(file)
--- a/
gdb/testsuite/gdb.base/step-test.exp
+++ b/
gdb/testsuite/gdb.base/step-test.exp
@@
-17,10
+17,6
@@
# along with this program. If not, see <http://www.gnu.org/licenses/>. */
# step-test.exp -- Expect script to test stepping in gdb
# along with this program. If not, see <http://www.gnu.org/licenses/>. */
# step-test.exp -- Expect script to test stepping in gdb
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile step-test
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile step-test
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.base/store.exp
b/gdb/testsuite/gdb.base/store.exp
index
ebb198a
..
cf71304
100644
(file)
--- a/
gdb/testsuite/gdb.base/store.exp
+++ b/
gdb/testsuite/gdb.base/store.exp
@@
-15,10
+15,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/>.
# 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 {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/structs.exp
b/gdb/testsuite/gdb.base/structs.exp
index
c24db83
..
e68ab6c
100644
(file)
--- a/
gdb/testsuite/gdb.base/structs.exp
+++ b/
gdb/testsuite/gdb.base/structs.exp
@@
-16,10
+16,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/>.
# 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
-}
-
# Some targets can't call functions, so don't even bother with this
# test.
# Some targets can't call functions, so don't even bother with this
# test.
diff --git
a/gdb/testsuite/gdb.base/structs2.exp
b/gdb/testsuite/gdb.base/structs2.exp
index
fb377bf
..
2d505d3
100644
(file)
--- a/
gdb/testsuite/gdb.base/structs2.exp
+++ b/
gdb/testsuite/gdb.base/structs2.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/>.
# 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
-}
-
set prototypes 1
set testfile "structs2"
set srcfile ${testfile}.c
set prototypes 1
set testfile "structs2"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/subst.exp
b/gdb/testsuite/gdb.base/subst.exp
index
525be9a
..
b604b67
100644
(file)
--- a/
gdb/testsuite/gdb.base/subst.exp
+++ b/
gdb/testsuite/gdb.base/subst.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/>.
# 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 {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
gdb_exit
gdb_start
gdb_reinitialize_dir $srcdir/$subdir
diff --git
a/gdb/testsuite/gdb.base/term.exp
b/gdb/testsuite/gdb.base/term.exp
index
fbadc08
..
7697160
100644
(file)
--- a/
gdb/testsuite/gdb.base/term.exp
+++ b/
gdb/testsuite/gdb.base/term.exp
@@
-16,10
+16,6
@@
# This file was written by Rob Savoye. (rob@cygnus.com)
# This file was written by Rob Savoye. (rob@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
# Don't try this for remote targets.
if [is_remote target] then {
continue
# Don't try this for remote targets.
if [is_remote target] then {
continue
diff --git
a/gdb/testsuite/gdb.base/testenv.exp
b/gdb/testsuite/gdb.base/testenv.exp
index
ff337fe
..
55e3088
100644
(file)
--- a/
gdb/testsuite/gdb.base/testenv.exp
+++ b/
gdb/testsuite/gdb.base/testenv.exp
@@
-18,10
+18,6
@@
# Check if environment variables are correctly passed to inferiors
#
# Check if environment variables are correctly passed to inferiors
#
-if $tracelevel then {
- strace $tracelevel
-}
-
# There's no support for passing environment variables in the remote protocol.
if { [is_remote target] } {
return 0
# There's no support for passing environment variables in the remote protocol.
if { [is_remote target] } {
return 0
diff --git
a/gdb/testsuite/gdb.base/trace-commands.exp
b/gdb/testsuite/gdb.base/trace-commands.exp
index
02f610a
..
b21db17
100644
(file)
--- a/
gdb/testsuite/gdb.base/trace-commands.exp
+++ b/
gdb/testsuite/gdb.base/trace-commands.exp
@@
-16,10
+16,6
@@
# Test that the source command's verbose mode works, the 'set trace-commands'
# command works, and that the nest depth is correct in various circumstances.
# Test that the source command's verbose mode works, the 'set trace-commands'
# command works, and that the nest depth is correct in various circumstances.
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.base/twice.exp
b/gdb/testsuite/gdb.base/twice.exp
index
dd92bad
..
41f9bdc
100644
(file)
--- a/
gdb/testsuite/gdb.base/twice.exp
+++ b/
gdb/testsuite/gdb.base/twice.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/>.
# 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
-}
-
set testfile twice-tmp
set srcfile ${testfile}.c
set testfile twice-tmp
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/type-opaque.exp
b/gdb/testsuite/gdb.base/type-opaque.exp
index
5e1e14a
..
999fb1d
100644
(file)
--- a/
gdb/testsuite/gdb.base/type-opaque.exp
+++ b/
gdb/testsuite/gdb.base/type-opaque.exp
@@
-15,10
+15,6
@@
# Test resolving of an opaque type from the loaded shared library.
# Test resolving of an opaque type from the loaded shared library.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile type-opaque-main
set libfile type-opaque-lib
set srcfile ${testfile}.c
set testfile type-opaque-main
set libfile type-opaque-lib
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/unload.exp
b/gdb/testsuite/gdb.base/unload.exp
index
03d6635
..
5ab0fcd
100644
(file)
--- a/
gdb/testsuite/gdb.base/unload.exp
+++ b/
gdb/testsuite/gdb.base/unload.exp
@@
-15,10
+15,6
@@
# This file was created by Jeff Johnston. (jjohnstn@redhat.com)
# This file was created by Jeff Johnston. (jjohnstn@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/until.exp
b/gdb/testsuite/gdb.base/until.exp
index
cbaccaf
..
6b647cd
100644
(file)
--- a/
gdb/testsuite/gdb.base/until.exp
+++ b/
gdb/testsuite/gdb.base/until.exp
@@
-15,10
+15,6
@@
# until.exp -- Expect script to test 'until' in gdb
# until.exp -- Expect script to test 'until' in gdb
-if $tracelevel then {
- strace $tracelevel
-}
-
set srcfile break.c
if { [prepare_for_testing until.exp "until" {break.c break1.c} {debug nowarnings}] } {
return -1
set srcfile break.c
if { [prepare_for_testing until.exp "until" {break.c break1.c} {debug nowarnings}] } {
return -1
diff --git
a/gdb/testsuite/gdb.base/unwindonsignal.exp
b/gdb/testsuite/gdb.base/unwindonsignal.exp
index
ab7d4f0
..
3e22679
100644
(file)
--- a/
gdb/testsuite/gdb.base/unwindonsignal.exp
+++ b/
gdb/testsuite/gdb.base/unwindonsignal.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/>.
# 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
-}
-
if [target_info exists gdb,noinferiorio] {
verbose "Skipping unwindonsignal.exp because of no fileio capabilities."
continue
if [target_info exists gdb,noinferiorio] {
verbose "Skipping unwindonsignal.exp because of no fileio capabilities."
continue
diff --git
a/gdb/testsuite/gdb.base/varargs.exp
b/gdb/testsuite/gdb.base/varargs.exp
index
16a517e
..
7a3e121
100644
(file)
--- a/
gdb/testsuite/gdb.base/varargs.exp
+++ b/
gdb/testsuite/gdb.base/varargs.exp
@@
-28,10
+28,6
@@
#quit
#quit
-if $tracelevel then {
- strace $tracelevel
-}
-
set prototypes 0
set testfile "varargs"
set prototypes 0
set testfile "varargs"
diff --git
a/gdb/testsuite/gdb.base/volatile.exp
b/gdb/testsuite/gdb.base/volatile.exp
index
b876f0f
..
827c28f
100644
(file)
--- a/
gdb/testsuite/gdb.base/volatile.exp
+++ b/
gdb/testsuite/gdb.base/volatile.exp
@@
-30,10
+30,6
@@
# ... etc. (you get the idea)
# Mostly with char and unsigned char.
# ... etc. (you get the idea)
# Mostly with char and unsigned char.
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/watch_thread_num.exp
b/gdb/testsuite/gdb.base/watch_thread_num.exp
index
dbf3758
..
630763b
100644
(file)
--- a/
gdb/testsuite/gdb.base/watch_thread_num.exp
+++ b/
gdb/testsuite/gdb.base/watch_thread_num.exp
@@
-19,10
+19,6
@@
# watch commands.
#
# watch commands.
#
-if $tracelevel then {
- strace $tracelevel
-}
-
# This test verifies that a watchpoint is detected in the proper thread
# so the test is only meaningful on a system with hardware watchpoints.
if {[skip_hw_watchpoint_tests]} {
# This test verifies that a watchpoint is detected in the proper thread
# so the test is only meaningful on a system with hardware watchpoints.
if {[skip_hw_watchpoint_tests]} {
diff --git
a/gdb/testsuite/gdb.base/watchpoint-solib.exp
b/gdb/testsuite/gdb.base/watchpoint-solib.exp
index
b9433ce
..
107c77c
100644
(file)
--- a/
gdb/testsuite/gdb.base/watchpoint-solib.exp
+++ b/
gdb/testsuite/gdb.base/watchpoint-solib.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/>.
# 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
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/watchpoint.exp
b/gdb/testsuite/gdb.base/watchpoint.exp
index
1860368
..
ba13a0c
100644
(file)
--- a/
gdb/testsuite/gdb.base/watchpoint.exp
+++ b/
gdb/testsuite/gdb.base/watchpoint.exp
@@
-15,10
+15,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "watchpoint"
set srcfile ${testfile}.c
set testfile "watchpoint"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/watchpoints.exp
b/gdb/testsuite/gdb.base/watchpoints.exp
index
b8b27dc
..
8edd62c
100644
(file)
--- a/
gdb/testsuite/gdb.base/watchpoints.exp
+++ b/
gdb/testsuite/gdb.base/watchpoints.exp
@@
-15,10
+15,6
@@
# This file was written by Pierre Muller. (muller@ics.u-strasbg.fr)
# This file was written by Pierre Muller. (muller@ics.u-strasbg.fr)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "watchpoints"
set srcfile ${testfile}.c
set testfile "watchpoints"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.base/whatis-exp.exp
b/gdb/testsuite/gdb.base/whatis-exp.exp
index
7ca9896
..
2c50854
100644
(file)
--- a/
gdb/testsuite/gdb.base/whatis-exp.exp
+++ b/
gdb/testsuite/gdb.base/whatis-exp.exp
@@
-25,10
+25,6
@@
# with the EVAL_AVOID_SIDE_EFFECTS flag rather than EVAL_NORMAL
#
# with the EVAL_AVOID_SIDE_EFFECTS flag rather than EVAL_NORMAL
#
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.base/whatis.exp
b/gdb/testsuite/gdb.base/whatis.exp
index
825eb7f
..
9198ef2
100644
(file)
--- a/
gdb/testsuite/gdb.base/whatis.exp
+++ b/
gdb/testsuite/gdb.base/whatis.exp
@@
-16,10
+16,6
@@
# This file was written by Rob Savoye. (rob@cygnus.com)
# This file was written by Rob Savoye. (rob@cygnus.com)
-if $tracelevel {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.cp/ambiguous.exp
b/gdb/testsuite/gdb.cp/ambiguous.exp
index
b03eb8c
..
539b32d
100644
(file)
--- a/
gdb/testsuite/gdb.cp/ambiguous.exp
+++ b/
gdb/testsuite/gdb.cp/ambiguous.exp
@@
-21,10
+21,6
@@
# This file is part of the gdb testsuite
# This file is part of the gdb testsuite
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.cp/annota2.exp
b/gdb/testsuite/gdb.cp/annota2.exp
index
99e396d
..
41e1cc5
100644
(file)
--- a/
gdb/testsuite/gdb.cp/annota2.exp
+++ b/
gdb/testsuite/gdb.cp/annota2.exp
@@
-15,10
+15,6
@@
# This file was written by Elena Zannoni (ezannoni@cygnus.com)
# This file was written by Elena Zannoni (ezannoni@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
# test running programs
diff --git
a/gdb/testsuite/gdb.cp/annota3.exp
b/gdb/testsuite/gdb.cp/annota3.exp
index
4003629
..
112fb85
100644
(file)
--- a/
gdb/testsuite/gdb.cp/annota3.exp
+++ b/
gdb/testsuite/gdb.cp/annota3.exp
@@
-15,10
+15,6
@@
# This file was written by Elena Zannoni (ezannoni@cygnus.com)
# This file was written by Elena Zannoni (ezannoni@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
# test running programs
diff --git
a/gdb/testsuite/gdb.cp/anon-union.exp
b/gdb/testsuite/gdb.cp/anon-union.exp
index
a8db275
..
fe30ef1
100644
(file)
--- a/
gdb/testsuite/gdb.cp/anon-union.exp
+++ b/
gdb/testsuite/gdb.cp/anon-union.exp
@@
-19,10
+19,6
@@
# This file is part of the gdb testsuite
# This file is part of the gdb testsuite
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.cp/arg-reference.exp
b/gdb/testsuite/gdb.cp/arg-reference.exp
index
6c59cdc
..
9eb3985
100644
(file)
--- a/
gdb/testsuite/gdb.cp/arg-reference.exp
+++ b/
gdb/testsuite/gdb.cp/arg-reference.exp
@@
-21,10
+21,6
@@
# Test G++ has compiled debuginfo without a C++ '&' reference where it should
# not be. GCC Bug 33537.
# Test G++ has compiled debuginfo without a C++ '&' reference where it should
# not be. GCC Bug 33537.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
if { [skip_cplus_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.cp/bool.exp
b/gdb/testsuite/gdb.cp/bool.exp
index
e33ebe9
..
9bf1810
100644
(file)
--- a/
gdb/testsuite/gdb.cp/bool.exp
+++ b/
gdb/testsuite/gdb.cp/bool.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel then {
- strace $tracelevel
-}
-
# Test returning bool.
if { [skip_cplus_tests] } { continue }
# Test returning bool.
if { [skip_cplus_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.cp/breakpoint.exp
b/gdb/testsuite/gdb.cp/breakpoint.exp
index
1072ff0
..
53b29c3
100644
(file)
--- a/
gdb/testsuite/gdb.cp/breakpoint.exp
+++ b/
gdb/testsuite/gdb.cp/breakpoint.exp
@@
-17,10
+17,6
@@
# This contains tests for breakpoints in C++.
# This contains tests for breakpoints in C++.
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_cplus_tests] } { continue }
#
if { [skip_cplus_tests] } { continue }
#
diff --git
a/gdb/testsuite/gdb.cp/bs15503.exp
b/gdb/testsuite/gdb.cp/bs15503.exp
index
23df242
..
95b4b4e
100644
(file)
--- a/
gdb/testsuite/gdb.cp/bs15503.exp
+++ b/
gdb/testsuite/gdb.cp/bs15503.exp
@@
-17,10
+17,6
@@
# This file was written by Sue Kimura (sue_kimura@hp.com)
# Rewritten by Michael Chastain (mec.gnu@mindspring.com)
# This file was written by Sue Kimura (sue_kimura@hp.com)
# Rewritten by Michael Chastain (mec.gnu@mindspring.com)
-if $tracelevel {
- strace $tracelevel
-}
-
if { [skip_stl_tests] } { continue }
# On SPU this test fails because the executable exceeds local storage size.
if { [skip_stl_tests] } { continue }
# On SPU this test fails because the executable exceeds local storage size.
diff --git
a/gdb/testsuite/gdb.cp/call-c.exp
b/gdb/testsuite/gdb.cp/call-c.exp
index
c0fc79d
..
a4327e8
100644
(file)
--- a/
gdb/testsuite/gdb.cp/call-c.exp
+++ b/
gdb/testsuite/gdb.cp/call-c.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/>.
# 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
-}
-
if { [skip_cplus_tests] } { continue }
if { [skip_cplus_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.cp/casts.exp
b/gdb/testsuite/gdb.cp/casts.exp
index
93fab94
..
84569ab
100644
(file)
--- a/
gdb/testsuite/gdb.cp/casts.exp
+++ b/
gdb/testsuite/gdb.cp/casts.exp
@@
-20,10
+20,6
@@
# This file is part of the gdb testsuite
# This file is part of the gdb testsuite
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.cp/class2.exp
b/gdb/testsuite/gdb.cp/class2.exp
index
7c2e63e
..
6a95245
100644
(file)
--- a/
gdb/testsuite/gdb.cp/class2.exp
+++ b/
gdb/testsuite/gdb.cp/class2.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/>.
# 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
- }
-
if { [skip_cplus_tests] } { continue }
if { [skip_cplus_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.cp/classes.exp
b/gdb/testsuite/gdb.cp/classes.exp
index
3793f91
..
ae43630
100644
(file)
--- a/
gdb/testsuite/gdb.cp/classes.exp
+++ b/
gdb/testsuite/gdb.cp/classes.exp
@@
-18,10
+18,6
@@
set nl "\[\r\n\]+"
set nl "\[\r\n\]+"
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
load_lib "cp-support.exp"
if { [skip_cplus_tests] } { continue }
load_lib "cp-support.exp"
diff --git
a/gdb/testsuite/gdb.cp/cpcompletion.exp
b/gdb/testsuite/gdb.cp/cpcompletion.exp
index
48dcca1
..
9161351
100644
(file)
--- a/
gdb/testsuite/gdb.cp/cpcompletion.exp
+++ b/
gdb/testsuite/gdb.cp/cpcompletion.exp
@@
-49,10
+49,6
@@
proc test_class_complete {class expr name matches} {
}
}
}
}
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
set testfile pr9594
if { [skip_cplus_tests] } { continue }
set testfile pr9594
diff --git
a/gdb/testsuite/gdb.cp/cpexprs.exp
b/gdb/testsuite/gdb.cp/cpexprs.exp
index
6b5e14e
..
13af265
100644
(file)
--- a/
gdb/testsuite/gdb.cp/cpexprs.exp
+++ b/
gdb/testsuite/gdb.cp/cpexprs.exp
@@
-663,10
+663,6
@@
add {policyd5::function} \
{operation_1<T>::function}
# Start the test
{operation_1<T>::function}
# Start the test
-if {$tracelevel} {
- strace $tracelevel
-}
-
if {[skip_cplus_tests]} { continue }
# On SPU this test fails because the executable exceeds local storage size.
if {[skip_cplus_tests]} { continue }
# On SPU this test fails because the executable exceeds local storage size.
diff --git
a/gdb/testsuite/gdb.cp/cplusfuncs.exp
b/gdb/testsuite/gdb.cp/cplusfuncs.exp
index
6aa5445
..
5bca25e
100644
(file)
--- a/
gdb/testsuite/gdb.cp/cplusfuncs.exp
+++ b/
gdb/testsuite/gdb.cp/cplusfuncs.exp
@@
-17,10
+17,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# Adapted for g++ 3.0 ABI by Michael Chastain. (chastain@redhat.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
# Adapted for g++ 3.0 ABI by Michael Chastain. (chastain@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
set testfile "cplusfuncs"
if { [skip_cplus_tests] } { continue }
set testfile "cplusfuncs"
diff --git
a/gdb/testsuite/gdb.cp/ctti.exp
b/gdb/testsuite/gdb.cp/ctti.exp
index
46c3a1f
..
17a76d3
100644
(file)
--- a/
gdb/testsuite/gdb.cp/ctti.exp
+++ b/
gdb/testsuite/gdb.cp/ctti.exp
@@
-22,10
+22,6
@@
# Call to template instantiations.
# Call to template instantiations.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
set testfile "cttiadd"
if { [skip_cplus_tests] } { continue }
set testfile "cttiadd"
diff --git
a/gdb/testsuite/gdb.cp/demangle.exp
b/gdb/testsuite/gdb.cp/demangle.exp
index
14ce0b0
..
c6e9491
100644
(file)
--- a/
gdb/testsuite/gdb.cp/demangle.exp
+++ b/
gdb/testsuite/gdb.cp/demangle.exp
@@
-16,10
+16,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
### The demangling style we last sent to GDB.
if { [skip_cplus_tests] } { continue }
### The demangling style we last sent to GDB.
diff --git
a/gdb/testsuite/gdb.cp/derivation.exp
b/gdb/testsuite/gdb.cp/derivation.exp
index
57bf416
..
eafaad6
100644
(file)
--- a/
gdb/testsuite/gdb.cp/derivation.exp
+++ b/
gdb/testsuite/gdb.cp/derivation.exp
@@
-25,10
+25,6
@@
set ws "\[\r\n\t \]+"
set nl "\[\r\n\]+"
set ws "\[\r\n\t \]+"
set nl "\[\r\n\]+"
-if $tracelevel then {
- strace $tracelevel
-}
-
# Start program.
# Start program.
diff --git
a/gdb/testsuite/gdb.cp/exception.exp
b/gdb/testsuite/gdb.cp/exception.exp
index
5cff73b
..
04dd6de
100644
(file)
--- a/
gdb/testsuite/gdb.cp/exception.exp
+++ b/
gdb/testsuite/gdb.cp/exception.exp
@@
-34,10
+34,6
@@
set ws "\[\r\n\t \]+"
set nl "\[\r\n\]+"
set ws "\[\r\n\t \]+"
set nl "\[\r\n\]+"
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_stl_tests] } { continue }
# On SPU this test fails because the executable exceeds local storage size.
if { [skip_stl_tests] } { continue }
# On SPU this test fails because the executable exceeds local storage size.
diff --git
a/gdb/testsuite/gdb.cp/formatted-ref.exp
b/gdb/testsuite/gdb.cp/formatted-ref.exp
index
34cb7c5
..
ff27439
100644
(file)
--- a/
gdb/testsuite/gdb.cp/formatted-ref.exp
+++ b/
gdb/testsuite/gdb.cp/formatted-ref.exp
@@
-27,10
+27,6
@@
# work properly: condition expression using a reference object as one of its
# operand.
# work properly: condition expression using a reference object as one of its
# operand.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
if { [skip_cplus_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.cp/gdb1355.exp
b/gdb/testsuite/gdb.cp/gdb1355.exp
index
f584279
..
140260c
100644
(file)
--- a/
gdb/testsuite/gdb.cp/gdb1355.exp
+++ b/
gdb/testsuite/gdb.cp/gdb1355.exp
@@
-21,10
+21,6
@@
set ws "\[\r\n\t \]*"
set nl "\[\r\n\]+"
set ws "\[\r\n\t \]*"
set nl "\[\r\n\]+"
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_cplus_tests] } { continue }
#
if { [skip_cplus_tests] } { continue }
#
diff --git
a/gdb/testsuite/gdb.cp/gdb2384.exp
b/gdb/testsuite/gdb.cp/gdb2384.exp
index
0ee27c4
..
ee78acd
100644
(file)
--- a/
gdb/testsuite/gdb.cp/gdb2384.exp
+++ b/
gdb/testsuite/gdb.cp/gdb2384.exp
@@
-21,10
+21,6
@@
#
# PR c++/9489.
#
# PR c++/9489.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
if { [skip_shlib_tests] } { continue }
if { [skip_cplus_tests] } { continue }
if { [skip_shlib_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.cp/gdb2495.exp
b/gdb/testsuite/gdb.cp/gdb2495.exp
index
5dbc226
..
1f76ffa
100644
(file)
--- a/
gdb/testsuite/gdb.cp/gdb2495.exp
+++ b/
gdb/testsuite/gdb.cp/gdb2495.exp
@@
-31,10
+31,6
@@
# This test is largely based of gdb.base/callfuncs.exp.
# This test is largely based of gdb.base/callfuncs.exp.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
if [target_info exists gdb,nosignals] {
if { [skip_cplus_tests] } { continue }
if [target_info exists gdb,nosignals] {
diff --git
a/gdb/testsuite/gdb.cp/hang.exp
b/gdb/testsuite/gdb.cp/hang.exp
index
2025a20
..
0b83ced
100644
(file)
--- a/
gdb/testsuite/gdb.cp/hang.exp
+++ b/
gdb/testsuite/gdb.cp/hang.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/>.
# 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
-}
-
if { [skip_cplus_tests] } { continue }
if { [skip_cplus_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.cp/inherit.exp
b/gdb/testsuite/gdb.cp/inherit.exp
index
c970d03
..
74e758b
100644
(file)
--- a/
gdb/testsuite/gdb.cp/inherit.exp
+++ b/
gdb/testsuite/gdb.cp/inherit.exp
@@
-21,10
+21,6
@@
set ws "\[\r\n\t \]+"
set nl "\[\r\n\]+"
set vhn "\\$\[0-9\]+"
set nl "\[\r\n\]+"
set vhn "\\$\[0-9\]+"
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
load_lib "cp-support.exp"
if { [skip_cplus_tests] } { continue }
load_lib "cp-support.exp"
diff --git
a/gdb/testsuite/gdb.cp/local.exp
b/gdb/testsuite/gdb.cp/local.exp
index
ce28283
..
e720583
100644
(file)
--- a/
gdb/testsuite/gdb.cp/local.exp
+++ b/
gdb/testsuite/gdb.cp/local.exp
@@
-23,10
+23,6
@@
set ws "\[\r\n\t \]+"
set nl "\[\r\n\]+"
set ws "\[\r\n\t \]+"
set nl "\[\r\n\]+"
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.cp/m-data.exp
b/gdb/testsuite/gdb.cp/m-data.exp
index
71620a2
..
1ef956e
100644
(file)
--- a/
gdb/testsuite/gdb.cp/m-data.exp
+++ b/
gdb/testsuite/gdb.cp/m-data.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite
# This file is part of the gdb testsuite
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_cplus_tests] } { continue }
#
if { [skip_cplus_tests] } { continue }
#
diff --git
a/gdb/testsuite/gdb.cp/m-static.exp
b/gdb/testsuite/gdb.cp/m-static.exp
index
0b8f290
..
563d701
100644
(file)
--- a/
gdb/testsuite/gdb.cp/m-static.exp
+++ b/
gdb/testsuite/gdb.cp/m-static.exp
@@
-19,10
+19,6
@@
# This file is part of the gdb testsuite
# This file is part of the gdb testsuite
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_cplus_tests] } { continue }
#
if { [skip_cplus_tests] } { continue }
#
diff --git
a/gdb/testsuite/gdb.cp/maint.exp
b/gdb/testsuite/gdb.cp/maint.exp
index
f576b31
..
768664a
100644
(file)
--- a/
gdb/testsuite/gdb.cp/maint.exp
+++ b/
gdb/testsuite/gdb.cp/maint.exp
@@
-18,10
+18,6
@@
# Currently, no source file is used.
# Currently, no source file is used.
-if $tracelevel then {
- strace $tracelevel
- }
-
# Test the help messages.
proc test_help {} {
# Test the help messages.
proc test_help {} {
diff --git
a/gdb/testsuite/gdb.cp/mb-ctor.exp
b/gdb/testsuite/gdb.cp/mb-ctor.exp
index
bff7ac5
..
c13b62c
100644
(file)
--- a/
gdb/testsuite/gdb.cp/mb-ctor.exp
+++ b/
gdb/testsuite/gdb.cp/mb-ctor.exp
@@
-16,10
+16,6
@@
# Test that breakpoints on C++ constructors work, despite the
# fact that gcc generates several versions of constructor function.
# Test that breakpoints on C++ constructors work, despite the
# fact that gcc generates several versions of constructor function.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
if { [skip_cplus_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.cp/mb-inline.exp
b/gdb/testsuite/gdb.cp/mb-inline.exp
index
1a29d35
..
bf00c26
100644
(file)
--- a/
gdb/testsuite/gdb.cp/mb-inline.exp
+++ b/
gdb/testsuite/gdb.cp/mb-inline.exp
@@
-18,10
+18,6
@@
# This test verifies that setting breakpoint on line in inline
# function will fire in all instantiations of that function.
# This test verifies that setting breakpoint on line in inline
# function will fire in all instantiations of that function.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
if { [skip_cplus_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.cp/mb-templates.exp
b/gdb/testsuite/gdb.cp/mb-templates.exp
index
dfb25cc
..
128f9f7
100644
(file)
--- a/
gdb/testsuite/gdb.cp/mb-templates.exp
+++ b/
gdb/testsuite/gdb.cp/mb-templates.exp
@@
-16,10
+16,6
@@
# This test verifies that setting breakpoint on line in template
# function will fire in all instantiations of that template.
# This test verifies that setting breakpoint on line in template
# function will fire in all instantiations of that template.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_stl_tests] } { continue }
# On SPU this test fails because the executable exceeds local storage size.
if { [skip_stl_tests] } { continue }
# On SPU this test fails because the executable exceeds local storage size.
diff --git
a/gdb/testsuite/gdb.cp/member-ptr.exp
b/gdb/testsuite/gdb.cp/member-ptr.exp
index
4b9a37d
..
7eb237d
100644
(file)
--- a/
gdb/testsuite/gdb.cp/member-ptr.exp
+++ b/
gdb/testsuite/gdb.cp/member-ptr.exp
@@
-22,10
+22,6
@@
set vhn "\\$\[0-9\]+"
set vhn "\\$\[0-9\]+"
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
if { [skip_cplus_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.cp/method.exp
b/gdb/testsuite/gdb.cp/method.exp
index
3fe24c3
..
b862bc6
100644
(file)
--- a/
gdb/testsuite/gdb.cp/method.exp
+++ b/
gdb/testsuite/gdb.cp/method.exp
@@
-29,10
+29,6
@@
# integrate FPARAM symbols in HP debug info into the local var list
# for the function or method's block.)
# integrate FPARAM symbols in HP debug info into the local var list
# for the function or method's block.)
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.cp/misc.exp
b/gdb/testsuite/gdb.cp/misc.exp
index
6e7bf11
..
a3ea820
100644
(file)
--- a/
gdb/testsuite/gdb.cp/misc.exp
+++ b/
gdb/testsuite/gdb.cp/misc.exp
@@
-16,10
+16,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
set testfile "misc"
if { [skip_cplus_tests] } { continue }
set testfile "misc"
diff --git
a/gdb/testsuite/gdb.cp/namespace-nested-import.exp
b/gdb/testsuite/gdb.cp/namespace-nested-import.exp
index
f0a934b
..
15506ae
100644
(file)
--- a/
gdb/testsuite/gdb.cp/namespace-nested-import.exp
+++ b/
gdb/testsuite/gdb.cp/namespace-nested-import.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/>.
# 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
-}
-
set testfile namespace-nested-import
set srcfile ${testfile}.cc
set testfile namespace-nested-import
set srcfile ${testfile}.cc
diff --git
a/gdb/testsuite/gdb.cp/namespace.exp
b/gdb/testsuite/gdb.cp/namespace.exp
index
e0789de
..
ccbd97f
100644
(file)
--- a/
gdb/testsuite/gdb.cp/namespace.exp
+++ b/
gdb/testsuite/gdb.cp/namespace.exp
@@
-25,10
+25,6
@@
# Note: As of 2000-06-03, they passed under g++ - djb
# Note: As of 2000-06-03, they passed under g++ - djb
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_cplus_tests] } { continue }
if { [skip_cplus_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.cp/nextoverthrow.exp
b/gdb/testsuite/gdb.cp/nextoverthrow.exp
index
2224628
..
7d4a0c5
100644
(file)
--- a/
gdb/testsuite/gdb.cp/nextoverthrow.exp
+++ b/
gdb/testsuite/gdb.cp/nextoverthrow.exp
@@
-14,10
+14,6
@@
# along with this program. If not, see <http://www.gnu.org/licenses/>.
# along with this program. If not, see <http://www.gnu.org/licenses/>.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
set testfile "nextoverthrow"
if { [skip_cplus_tests] } { continue }
set testfile "nextoverthrow"
diff --git
a/gdb/testsuite/gdb.cp/nsdecl.exp
b/gdb/testsuite/gdb.cp/nsdecl.exp
index
f8617d1
..
5da4a0c
100644
(file)
--- a/
gdb/testsuite/gdb.cp/nsdecl.exp
+++ b/
gdb/testsuite/gdb.cp/nsdecl.exp
@@
-15,10
+15,6
@@
# Stress test the lookup of declarations
# Stress test the lookup of declarations
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile nsdecl
set srcfile ${testfile}.cc
set testfile nsdecl
set srcfile ${testfile}.cc
diff --git
a/gdb/testsuite/gdb.cp/nsimport.exp
b/gdb/testsuite/gdb.cp/nsimport.exp
index
deeca46
..
6f937a7
100644
(file)
--- a/
gdb/testsuite/gdb.cp/nsimport.exp
+++ b/
gdb/testsuite/gdb.cp/nsimport.exp
@@
-16,10
+16,6
@@
# Test printing from multiple namespace
# imported into the same scope.
# Test printing from multiple namespace
# imported into the same scope.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile nsimport
set srcfile ${testfile}.cc
set testfile nsimport
set srcfile ${testfile}.cc
diff --git
a/gdb/testsuite/gdb.cp/nsrecurs.exp
b/gdb/testsuite/gdb.cp/nsrecurs.exp
index
fa80eb4
..
49affaa
100644
(file)
--- a/
gdb/testsuite/gdb.cp/nsrecurs.exp
+++ b/
gdb/testsuite/gdb.cp/nsrecurs.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/>.
# 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
-}
-
set testfile nsrecurs
set srcfile ${testfile}.cc
set testfile nsrecurs
set srcfile ${testfile}.cc
diff --git
a/gdb/testsuite/gdb.cp/nsstress.exp
b/gdb/testsuite/gdb.cp/nsstress.exp
index
93f310c
..
dbc1a04
100644
(file)
--- a/
gdb/testsuite/gdb.cp/nsstress.exp
+++ b/
gdb/testsuite/gdb.cp/nsstress.exp
@@
-15,10
+15,6
@@
# Stress test namespace lookup
# Stress test namespace lookup
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile nsstress
set srcfile ${testfile}.cc
set testfile nsstress
set srcfile ${testfile}.cc
diff --git
a/gdb/testsuite/gdb.cp/nsusing.exp
b/gdb/testsuite/gdb.cp/nsusing.exp
index
fd8caec
..
fecb882
100644
(file)
--- a/
gdb/testsuite/gdb.cp/nsusing.exp
+++ b/
gdb/testsuite/gdb.cp/nsusing.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/>.
# 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
-}
-
set testfile nsusing
set srcfile ${testfile}.cc
set testfile nsusing
set srcfile ${testfile}.cc
diff --git
a/gdb/testsuite/gdb.cp/overload.exp
b/gdb/testsuite/gdb.cp/overload.exp
index
10bd4de
..
5116e5f
100644
(file)
--- a/
gdb/testsuite/gdb.cp/overload.exp
+++ b/
gdb/testsuite/gdb.cp/overload.exp
@@
-20,10
+20,6
@@
# Tests for overloaded member functions.
# Tests for overloaded member functions.
-if $tracelevel then {
- strace $tracelevel
-}
-
set ws "\[\r\n\t \]+"
set nl "\[\r\n\]+"
set ws "\[\r\n\t \]+"
set nl "\[\r\n\]+"
diff --git
a/gdb/testsuite/gdb.cp/ovldbreak.exp
b/gdb/testsuite/gdb.cp/ovldbreak.exp
index
ddc4117
..
b719224
100644
(file)
--- a/
gdb/testsuite/gdb.cp/ovldbreak.exp
+++ b/
gdb/testsuite/gdb.cp/ovldbreak.exp
@@
-25,10
+25,6
@@
global timeout
set timeout 15
global timeout
set timeout 15
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.cp/pr-1023.exp
b/gdb/testsuite/gdb.cp/pr-1023.exp
index
8e41e04
..
0eec05c
100644
(file)
--- a/
gdb/testsuite/gdb.cp/pr-1023.exp
+++ b/
gdb/testsuite/gdb.cp/pr-1023.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_cplus_tests] } { continue }
#
if { [skip_cplus_tests] } { continue }
#
diff --git
a/gdb/testsuite/gdb.cp/pr-1210.exp
b/gdb/testsuite/gdb.cp/pr-1210.exp
index
b0fc3c9
..
90da5bc
100644
(file)
--- a/
gdb/testsuite/gdb.cp/pr-1210.exp
+++ b/
gdb/testsuite/gdb.cp/pr-1210.exp
@@
-17,10
+17,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
#
if { [skip_cplus_tests] } { continue }
#
diff --git
a/gdb/testsuite/gdb.cp/pr-574.exp
b/gdb/testsuite/gdb.cp/pr-574.exp
index
abc38d1
..
b8333f8
100644
(file)
--- a/
gdb/testsuite/gdb.cp/pr-574.exp
+++ b/
gdb/testsuite/gdb.cp/pr-574.exp
@@
-20,10
+20,6
@@
# This file is part of the gdb testsuite
# This file is part of the gdb testsuite
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_cplus_tests] } { continue }
#
if { [skip_cplus_tests] } { continue }
#
diff --git
a/gdb/testsuite/gdb.cp/printmethod.exp
b/gdb/testsuite/gdb.cp/printmethod.exp
index
998fffc
..
5362b80
100644
(file)
--- a/
gdb/testsuite/gdb.cp/printmethod.exp
+++ b/
gdb/testsuite/gdb.cp/printmethod.exp
@@
-19,10
+19,6
@@
# This file is part of the gdb testsuite
# This file is part of the gdb testsuite
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_cplus_tests] } { continue }
#
if { [skip_cplus_tests] } { continue }
#
diff --git
a/gdb/testsuite/gdb.cp/psmang.exp
b/gdb/testsuite/gdb.cp/psmang.exp
index
743f882
..
605f8eb
100644
(file)
--- a/
gdb/testsuite/gdb.cp/psmang.exp
+++ b/
gdb/testsuite/gdb.cp/psmang.exp
@@
-171,10
+171,6
@@
# other ways this test could fail to do its job. If you need to make
# revisions, please be very careful.
# other ways this test could fail to do its job. If you need to make
# revisions, please be very careful.
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.cp/punctuator.exp
b/gdb/testsuite/gdb.cp/punctuator.exp
index
9af22ad
..
27ef37c
100644
(file)
--- a/
gdb/testsuite/gdb.cp/punctuator.exp
+++ b/
gdb/testsuite/gdb.cp/punctuator.exp
@@
-17,10
+17,6
@@
# This file is part of the gdb testsuite
# This file is part of the gdb testsuite
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_cplus_tests] } { continue }
gdb_exit
if { [skip_cplus_tests] } { continue }
gdb_exit
diff --git
a/gdb/testsuite/gdb.cp/ref-params.exp
b/gdb/testsuite/gdb.cp/ref-params.exp
index
23f9de8
..
f133a89
100644
(file)
--- a/
gdb/testsuite/gdb.cp/ref-params.exp
+++ b/
gdb/testsuite/gdb.cp/ref-params.exp
@@
-16,10
+16,6
@@
# written by Paul N. Hilfinger (Hilfinger@adacore.com)
# written by Paul N. Hilfinger (Hilfinger@adacore.com)
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.cp/ref-types.exp
b/gdb/testsuite/gdb.cp/ref-types.exp
index
3e63b6b
..
346aac4
100644
(file)
--- a/
gdb/testsuite/gdb.cp/ref-types.exp
+++ b/
gdb/testsuite/gdb.cp/ref-types.exp
@@
-16,10
+16,6
@@
# written by Elena Zannoni (ezannoni@cygnus.com)
# written by Elena Zannoni (ezannoni@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.cp/rtti.exp
b/gdb/testsuite/gdb.cp/rtti.exp
index
35e37b0
..
d9e413f
100644
(file)
--- a/
gdb/testsuite/gdb.cp/rtti.exp
+++ b/
gdb/testsuite/gdb.cp/rtti.exp
@@
-26,10
+26,6
@@
# (involving templates, in particular) where this problem triggers
# because GDB and GCC have different ideas what a class is called.
# (involving templates, in particular) where this problem triggers
# because GDB and GCC have different ideas what a class is called.
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_cplus_tests] } { continue }
#
if { [skip_cplus_tests] } { continue }
#
diff --git
a/gdb/testsuite/gdb.cp/shadow.exp
b/gdb/testsuite/gdb.cp/shadow.exp
index
a6b40d1
..
47d6207
100644
(file)
--- a/
gdb/testsuite/gdb.cp/shadow.exp
+++ b/
gdb/testsuite/gdb.cp/shadow.exp
@@
-16,10
+16,6
@@
# Test that when multiple variables have the same
# name the one from the correct scope is printed.
# Test that when multiple variables have the same
# name the one from the correct scope is printed.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile shadow
set srcfile ${testfile}.cc
set testfile shadow
set srcfile ${testfile}.cc
diff --git
a/gdb/testsuite/gdb.cp/temargs.exp
b/gdb/testsuite/gdb.cp/temargs.exp
index
bb4fc94
..
24541a4
100644
(file)
--- a/
gdb/testsuite/gdb.cp/temargs.exp
+++ b/
gdb/testsuite/gdb.cp/temargs.exp
@@
-17,10
+17,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if {$tracelevel} {
- strace $tracelevel
-}
-
if {[skip_cplus_tests]} {
continue
}
if {[skip_cplus_tests]} {
continue
}
diff --git
a/gdb/testsuite/gdb.cp/templates.exp
b/gdb/testsuite/gdb.cp/templates.exp
index
4fdcabf
..
72b65ae
100644
(file)
--- a/
gdb/testsuite/gdb.cp/templates.exp
+++ b/
gdb/testsuite/gdb.cp/templates.exp
@@
-18,10
+18,6
@@
set ws "\[\r\n\t \]+"
set ws "\[\r\n\t \]+"
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
set testfile "templates"
if { [skip_cplus_tests] } { continue }
set testfile "templates"
diff --git
a/gdb/testsuite/gdb.cp/try_catch.exp
b/gdb/testsuite/gdb.cp/try_catch.exp
index
474d674
..
846d8f9
100644
(file)
--- a/
gdb/testsuite/gdb.cp/try_catch.exp
+++ b/
gdb/testsuite/gdb.cp/try_catch.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite
# This file is part of the gdb testsuite
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_stl_tests] } { continue }
#
if { [skip_stl_tests] } { continue }
#
diff --git
a/gdb/testsuite/gdb.cp/userdef.exp
b/gdb/testsuite/gdb.cp/userdef.exp
index
98bd105
..
9c7cb57
100644
(file)
--- a/
gdb/testsuite/gdb.cp/userdef.exp
+++ b/
gdb/testsuite/gdb.cp/userdef.exp
@@
-19,10
+19,6
@@
# source file "userdef.cc"
#
# source file "userdef.cc"
#
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_stl_tests] } { continue }
# On SPU this test fails because the executable exceeds local storage size.
if { [skip_stl_tests] } { continue }
# On SPU this test fails because the executable exceeds local storage size.
diff --git
a/gdb/testsuite/gdb.cp/virtfunc.exp
b/gdb/testsuite/gdb.cp/virtfunc.exp
index
ab8eceb
..
dd41c6d
100644
(file)
--- a/
gdb/testsuite/gdb.cp/virtfunc.exp
+++ b/
gdb/testsuite/gdb.cp/virtfunc.exp
@@
-19,10
+19,6
@@
set nl "\[\r\n\]+"
set nl "\[\r\n\]+"
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
load_lib "cp-support.exp"
if { [skip_cplus_tests] } { continue }
load_lib "cp-support.exp"
diff --git
a/gdb/testsuite/gdb.disasm/am33.exp
b/gdb/testsuite/gdb.disasm/am33.exp
index
3486667
..
c06f00b
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/am33.exp
+++ b/
gdb/testsuite/gdb.disasm/am33.exp
@@
-16,10
+16,6
@@
# This file was written by Jeff Law. (law@cygnus.com)
# This file was written by Jeff Law. (law@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "mn10300*-*-*"] {
verbose "Tests ignored for all but mn10300 based targets."
return
if ![istarget "mn10300*-*-*"] {
verbose "Tests ignored for all but mn10300 based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/h8300s.exp
b/gdb/testsuite/gdb.disasm/h8300s.exp
index
b1a5524
..
4a00f5d
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/h8300s.exp
+++ b/
gdb/testsuite/gdb.disasm/h8300s.exp
@@
-15,10
+15,6
@@
# This file was written by Kazu Hirata. (kazu@hxi.com)
# This file was written by Kazu Hirata. (kazu@hxi.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/hppa.exp
b/gdb/testsuite/gdb.disasm/hppa.exp
index
99c02a2
..
39ff779
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/hppa.exp
+++ b/
gdb/testsuite/gdb.disasm/hppa.exp
@@
-16,10
+16,6
@@
# This file was written by Jeff Law. (law@cs.utah.edu)
# This file was written by Jeff Law. (law@cs.utah.edu)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "hppa*-*-*"] {
verbose "Tests ignored for all but hppa based targets."
return
if ![istarget "hppa*-*-*"] {
verbose "Tests ignored for all but hppa based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/mn10300.exp
b/gdb/testsuite/gdb.disasm/mn10300.exp
index
f001c23
..
1fc3ff0
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/mn10300.exp
+++ b/
gdb/testsuite/gdb.disasm/mn10300.exp
@@
-16,10
+16,6
@@
# This file was written by Jeff Law. (law@cygnus.com)
# This file was written by Jeff Law. (law@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "mn10300*-*-*"] {
verbose "Tests ignored for all but mn10300 based targets."
return
if ![istarget "mn10300*-*-*"] {
verbose "Tests ignored for all but mn10300 based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/sh3.exp
b/gdb/testsuite/gdb.disasm/sh3.exp
index
c4fb7e7
..
0e702f5
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/sh3.exp
+++ b/
gdb/testsuite/gdb.disasm/sh3.exp
@@
-15,10
+15,6
@@
# This file was written by Jeff Law. (law@cs.utah.edu)
# This file was written by Jeff Law. (law@cs.utah.edu)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "sh3*-*-*"] {
verbose "Tests ignored for all but sh3 based targets."
return
if ![istarget "sh3*-*-*"] {
verbose "Tests ignored for all but sh3 based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t01_mov.exp
b/gdb/testsuite/gdb.disasm/t01_mov.exp
index
110fa74
..
3f4c037
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t01_mov.exp
+++ b/
gdb/testsuite/gdb.disasm/t01_mov.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t02_mova.exp
b/gdb/testsuite/gdb.disasm/t02_mova.exp
index
b3dbcb7
..
c6d4740
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t02_mova.exp
+++ b/
gdb/testsuite/gdb.disasm/t02_mova.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t03_add.exp
b/gdb/testsuite/gdb.disasm/t03_add.exp
index
175f2a1
..
7880778
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t03_add.exp
+++ b/
gdb/testsuite/gdb.disasm/t03_add.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t04_sub.exp
b/gdb/testsuite/gdb.disasm/t04_sub.exp
index
d1bc71e
..
3e8bfea
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t04_sub.exp
+++ b/
gdb/testsuite/gdb.disasm/t04_sub.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t05_cmp.exp
b/gdb/testsuite/gdb.disasm/t05_cmp.exp
index
a0ea60b
..
ecf031b
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t05_cmp.exp
+++ b/
gdb/testsuite/gdb.disasm/t05_cmp.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t06_ari2.exp
b/gdb/testsuite/gdb.disasm/t06_ari2.exp
index
4cd4188
..
c013b5a
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t06_ari2.exp
+++ b/
gdb/testsuite/gdb.disasm/t06_ari2.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t07_ari3.exp
b/gdb/testsuite/gdb.disasm/t07_ari3.exp
index
6a2a0fe
..
a585134
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t07_ari3.exp
+++ b/
gdb/testsuite/gdb.disasm/t07_ari3.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t08_or.exp
b/gdb/testsuite/gdb.disasm/t08_or.exp
index
1c27b19
..
9b89f71
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t08_or.exp
+++ b/
gdb/testsuite/gdb.disasm/t08_or.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t09_xor.exp
b/gdb/testsuite/gdb.disasm/t09_xor.exp
index
f5794fe
..
63b9887
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t09_xor.exp
+++ b/
gdb/testsuite/gdb.disasm/t09_xor.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t10_and.exp
b/gdb/testsuite/gdb.disasm/t10_and.exp
index
97ea0a5
..
516cc85
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t10_and.exp
+++ b/
gdb/testsuite/gdb.disasm/t10_and.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t11_logs.exp
b/gdb/testsuite/gdb.disasm/t11_logs.exp
index
75fd7f7
..
3baa28e
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t11_logs.exp
+++ b/
gdb/testsuite/gdb.disasm/t11_logs.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t12_bit.exp
b/gdb/testsuite/gdb.disasm/t12_bit.exp
index
a03b5d6
..
8ff157b
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t12_bit.exp
+++ b/
gdb/testsuite/gdb.disasm/t12_bit.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.disasm/t13_otr.exp
b/gdb/testsuite/gdb.disasm/t13_otr.exp
index
21904d8
..
ece053f
100644
(file)
--- a/
gdb/testsuite/gdb.disasm/t13_otr.exp
+++ b/
gdb/testsuite/gdb.disasm/t13_otr.exp
@@
-15,10
+15,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This file was written by Michael Snyder (msnyder@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
if ![istarget "h8300*-*-*"] {
verbose "Tests ignored for all but h8300s based targets."
return
diff --git
a/gdb/testsuite/gdb.fortran/array-element.exp
b/gdb/testsuite/gdb.fortran/array-element.exp
index
412e3ea
..
9150a45
100644
(file)
--- a/
gdb/testsuite/gdb.fortran/array-element.exp
+++ b/
gdb/testsuite/gdb.fortran/array-element.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite. It contains test for printing
# the elements of an array which is passed as pointer to a subroutine.
# This file is part of the gdb testsuite. It contains test for printing
# the elements of an array which is passed as pointer to a subroutine.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_fortran_tests] } { return -1 }
set testfile "array-element"
if { [skip_fortran_tests] } { return -1 }
set testfile "array-element"
diff --git
a/gdb/testsuite/gdb.fortran/derived-type.exp
b/gdb/testsuite/gdb.fortran/derived-type.exp
index
c026742
..
b131da5
100644
(file)
--- a/
gdb/testsuite/gdb.fortran/derived-type.exp
+++ b/
gdb/testsuite/gdb.fortran/derived-type.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite. It contains tests for type-printing
# and value-printing Fortran derived types.
# This file is part of the gdb testsuite. It contains tests for type-printing
# and value-printing Fortran derived types.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_fortran_tests] } { return -1 }
set testfile "derived-type"
if { [skip_fortran_tests] } { return -1 }
set testfile "derived-type"
diff --git
a/gdb/testsuite/gdb.fortran/exprs.exp
b/gdb/testsuite/gdb.fortran/exprs.exp
index
2a1c157
..
20eb0ea
100644
(file)
--- a/
gdb/testsuite/gdb.fortran/exprs.exp
+++ b/
gdb/testsuite/gdb.fortran/exprs.exp
@@
-17,10
+17,6
@@
# This file was adapted from old Chill tests by Stan Shebs
# (shebs@cygnus.com).
# This file was adapted from old Chill tests by Stan Shebs
# (shebs@cygnus.com).
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "fortran.exp"
if { [skip_fortran_tests] } { continue }
load_lib "fortran.exp"
if { [skip_fortran_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.fortran/subarray.exp
b/gdb/testsuite/gdb.fortran/subarray.exp
index
4615126
..
d43c85a
100644
(file)
--- a/
gdb/testsuite/gdb.fortran/subarray.exp
+++ b/
gdb/testsuite/gdb.fortran/subarray.exp
@@
-18,10
+18,6
@@
# This file is part of the gdb testsuite. It contains tests for evaluating
# Fortran subarray expression.
# This file is part of the gdb testsuite. It contains tests for evaluating
# Fortran subarray expression.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_fortran_tests] } { return -1 }
set testfile "subarray"
if { [skip_fortran_tests] } { return -1 }
set testfile "subarray"
diff --git
a/gdb/testsuite/gdb.fortran/types.exp
b/gdb/testsuite/gdb.fortran/types.exp
index
99f9fc8
..
cbfb122
100644
(file)
--- a/
gdb/testsuite/gdb.fortran/types.exp
+++ b/
gdb/testsuite/gdb.fortran/types.exp
@@
-17,10
+17,6
@@
# This file was adapted from old Chill tests by Stan Shebs
# (shebs@cygnus.com).
# This file was adapted from old Chill tests by Stan Shebs
# (shebs@cygnus.com).
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "fortran.exp"
if { [skip_fortran_tests] } { continue }
load_lib "fortran.exp"
if { [skip_fortran_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.gdb/complaints.exp
b/gdb/testsuite/gdb.gdb/complaints.exp
index
adaa47d
..
5ec02ff
100644
(file)
--- a/
gdb/testsuite/gdb.gdb/complaints.exp
+++ b/
gdb/testsuite/gdb.gdb/complaints.exp
@@
-17,10
+17,6
@@
# derived from xfullpath.exp (written by Joel Brobecker), derived from
# selftest.exp (written by Rob Savoye).
# derived from xfullpath.exp (written by Joel Brobecker), derived from
# selftest.exp (written by Rob Savoye).
-if $tracelevel then {
- strace $tracelevel
-}
-
# are we on a target board
if { [is_remote target] || ![isnative] } then {
# are we on a target board
if { [is_remote target] || ![isnative] } then {
diff --git
a/gdb/testsuite/gdb.gdb/observer.exp
b/gdb/testsuite/gdb.gdb/observer.exp
index
bf6741c
..
47a4a11
100644
(file)
--- a/
gdb/testsuite/gdb.gdb/observer.exp
+++ b/
gdb/testsuite/gdb.gdb/observer.exp
@@
-16,10
+16,6
@@
# This file was written by Joel Brobecker (brobecker@gnat.com), derived
# from xfullpath.exp.
# This file was written by Joel Brobecker (brobecker@gnat.com), derived
# from xfullpath.exp.
-if $tracelevel then {
- strace $tracelevel
-}
-
# are we on a target board
if { [is_remote target] || ![isnative] } then {
# are we on a target board
if { [is_remote target] || ![isnative] } then {
diff --git
a/gdb/testsuite/gdb.gdb/selftest.exp
b/gdb/testsuite/gdb.gdb/selftest.exp
index
91c2ee4
..
21798bc
100644
(file)
--- a/
gdb/testsuite/gdb.gdb/selftest.exp
+++ b/
gdb/testsuite/gdb.gdb/selftest.exp
@@
-16,10
+16,6
@@
# This file was written by Rob Savoye. (rob@cygnus.com)
# This file was written by Rob Savoye. (rob@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
# are we on a target board
if { [is_remote target] || ![isnative] } then {
# are we on a target board
if { [is_remote target] || ![isnative] } then {
diff --git
a/gdb/testsuite/gdb.gdb/xfullpath.exp
b/gdb/testsuite/gdb.gdb/xfullpath.exp
index
1377802
..
0ebf824
100644
(file)
--- a/
gdb/testsuite/gdb.gdb/xfullpath.exp
+++ b/
gdb/testsuite/gdb.gdb/xfullpath.exp
@@
-16,10
+16,6
@@
# This file was written by Joel Brobecker. (brobecker@gnat.com), derived
# from selftest.exp, written by Rob Savoye.
# This file was written by Joel Brobecker. (brobecker@gnat.com), derived
# from selftest.exp, written by Rob Savoye.
-if $tracelevel then {
- strace $tracelevel
-}
-
# are we on a target board
if { [is_remote target] || ![isnative] } then {
# are we on a target board
if { [is_remote target] || ![isnative] } then {
diff --git
a/gdb/testsuite/gdb.hp/gdb.aCC/optimize.exp
b/gdb/testsuite/gdb.hp/gdb.aCC/optimize.exp
index
592b3b5
..
803c5ca
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.aCC/optimize.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.aCC/optimize.exp
@@
-24,10
+24,6
@@
global timeout
#
#log_user 1
#
#log_user 1
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_hp_tests] } then { continue }
set testfile optimize
if { [skip_hp_tests] } then { continue }
set testfile optimize
diff --git
a/gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp
b/gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp
index
7ae2de6
..
5ad4a3b
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.aCC/watch-cmd.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/>.
# 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
-}
-
#
# test special commands
#
#
# test special commands
#
diff --git
a/gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp
b/gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp
index
c0f0877
..
a9011ea
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.base-hp/callfwmall.exp
@@
-81,10
+81,6
@@
# inferior function calls to evaluate array literals. But many people
# jump to other, incorrect conclusions about this.
# inferior function calls to evaluate array literals. But many people
# jump to other, incorrect conclusions about this.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_hp_tests] } then { continue }
if { [skip_hp_tests] } then { continue }
diff --git
a/gdb/testsuite/gdb.hp/gdb.base-hp/dollar.exp
b/gdb/testsuite/gdb.hp/gdb.base-hp/dollar.exp
index
e212905
..
253e7dc
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.base-hp/dollar.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.base-hp/dollar.exp
@@
-24,10
+24,6
@@
# This file was written by Satish Pai <pai@apollo.hp.com>
# 1997-09-24
# This file was written by Satish Pai <pai@apollo.hp.com>
# 1997-09-24
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp
b/gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp
index
4dc8516
..
a4a765b
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.base-hp/hwwatchbus.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/>. */
# 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
- }
-
if { [skip_hp_tests] } then { continue }
if { [skip_hp_tests] } then { continue }
diff --git
a/gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp
b/gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp
index
aad9aec
..
00eebe8
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.base-hp/pxdb.exp
@@
-20,10
+20,6
@@
# pxdb.exp Test that gdb calls pxdb on an application
# built without it.
#
# pxdb.exp Test that gdb calls pxdb on an application
# built without it.
#
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_hp_tests] } then { continue }
if { [skip_hp_tests] } then { continue }
diff --git
a/gdb/testsuite/gdb.hp/gdb.base-hp/reg-pa64.exp
b/gdb/testsuite/gdb.hp/gdb.base-hp/reg-pa64.exp
index
39aa44a
..
3ff4f4b
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.base-hp/reg-pa64.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.base-hp/reg-pa64.exp
@@
-17,10
+17,6
@@
# use this to debug:
#log_user 1
# use this to debug:
#log_user 1
-if $tracelevel {
- strace $tracelevel
-}
-
if { [skip_hp_tests] } { continue }
if ![istarget "hppa*-*-*"] {
if { [skip_hp_tests] } { continue }
if ![istarget "hppa*-*-*"] {
diff --git
a/gdb/testsuite/gdb.hp/gdb.base-hp/reg.exp
b/gdb/testsuite/gdb.hp/gdb.base-hp/reg.exp
index
edb24f6
..
15c947f
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.base-hp/reg.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.base-hp/reg.exp
@@
-20,10
+20,6
@@
# use this to debug:
#log_user 1
# use this to debug:
#log_user 1
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_hp_tests] } then { continue }
set testfile "reg"
if { [skip_hp_tests] } then { continue }
set testfile "reg"
diff --git
a/gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp
b/gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp
index
8893d46
..
082e32b
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.base-hp/sized-enum.exp
@@
-22,10
+22,6
@@
# This file was written by Satish Pai <pai@apollo.hp.com>
# 1997-09-24
# This file was written by Satish Pai <pai@apollo.hp.com>
# 1997-09-24
-if $tracelevel then {
- strace $tracelevel
- }
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.exp
b/gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.exp
index
b7e4d06
..
10a9a7a
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.base-hp/so-thresh.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/>. */
# 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
- }
-
if { [skip_hp_tests] } then { continue }
if { [skip_hp_tests] } then { continue }
diff --git
a/gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp
b/gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp
index
4d266cb
..
ca3f51f
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.compat/xdb1.exp
@@
-16,10
+16,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_hp_tests] } then { continue }
#
if { [skip_hp_tests] } then { continue }
#
diff --git
a/gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp
b/gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp
index
a0789e3
..
821641a
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.compat/xdb2.exp
@@
-16,10
+16,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
- }
-
if { [skip_hp_tests] } then { continue }
global message
if { [skip_hp_tests] } then { continue }
global message
diff --git
a/gdb/testsuite/gdb.hp/gdb.compat/xdb3.exp
b/gdb/testsuite/gdb.hp/gdb.compat/xdb3.exp
index
c331c37
..
61c459d
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.compat/xdb3.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.compat/xdb3.exp
@@
-14,10
+14,6
@@
# along with this program. If not, see <http://www.gnu.org/licenses/>. */
# along with this program. If not, see <http://www.gnu.org/licenses/>. */
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_hp_tests] } then { continue }
set testfile1 "average"
if { [skip_hp_tests] } then { continue }
set testfile1 "average"
diff --git
a/gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp
b/gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp
index
abd4e6f
..
27985ff
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.defects/bs14602.exp
@@
-4,10
+4,6
@@
#
# Source file: bs14602.c
#
# Source file: bs14602.c
-if $tracelevel {
- strace $tracelevel
-}
-
if { [skip_hp_tests] } { continue }
#
if { [skip_hp_tests] } { continue }
#
diff --git
a/gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp
b/gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp
index
4b65d67
..
30d0838
100644
(file)
--- a/
gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp
+++ b/
gdb/testsuite/gdb.hp/gdb.defects/solib-d.exp
@@
-44,10
+44,6
@@
#
#
#
#
-if $tracelevel {
- strace $tracelevel
-}
-
if { [skip_hp_tests] } { continue }
if { [skip_hp_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.java/jmain.exp
b/gdb/testsuite/gdb.java/jmain.exp
index
8e9d7c6
..
8bb82b1
100644
(file)
--- a/
gdb/testsuite/gdb.java/jmain.exp
+++ b/
gdb/testsuite/gdb.java/jmain.exp
@@
-16,10
+16,6
@@
# This file was based on jmisc.exp which in turn was written by
# Anthony Green. (green@redhat.com)
# This file was based on jmisc.exp which in turn was written by
# Anthony Green. (green@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "java.exp"
if { [skip_java_tests] } { continue }
load_lib "java.exp"
if { [skip_java_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.java/jmisc.exp
b/gdb/testsuite/gdb.java/jmisc.exp
index
050ea56
..
9ca35b8
100644
(file)
--- a/
gdb/testsuite/gdb.java/jmisc.exp
+++ b/
gdb/testsuite/gdb.java/jmisc.exp
@@
-16,10
+16,6
@@
# This file was written by Anthony Green. (green@redhat.com)
#
# This file was written by Anthony Green. (green@redhat.com)
#
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "java.exp"
if { [skip_java_tests] } { continue }
load_lib "java.exp"
if { [skip_java_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.java/jnpe.exp
b/gdb/testsuite/gdb.java/jnpe.exp
index
85daf9d
..
dc76bc8
100644
(file)
--- a/
gdb/testsuite/gdb.java/jnpe.exp
+++ b/
gdb/testsuite/gdb.java/jnpe.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/>.
# 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 "java.exp"
set testfile "jnpe"
load_lib "java.exp"
set testfile "jnpe"
diff --git
a/gdb/testsuite/gdb.java/jprint.exp
b/gdb/testsuite/gdb.java/jprint.exp
index
c11be67
..
97660e6
100644
(file)
--- a/
gdb/testsuite/gdb.java/jprint.exp
+++ b/
gdb/testsuite/gdb.java/jprint.exp
@@
-16,10
+16,6
@@
# This file was written by Jeff Johnston. (jjohnstn@redhat.com)
#
# This file was written by Jeff Johnston. (jjohnstn@redhat.com)
#
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "java.exp"
if { [skip_java_tests] } { continue }
load_lib "java.exp"
if { [skip_java_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.java/jv-exp.exp
b/gdb/testsuite/gdb.java/jv-exp.exp
index
d3c7c0e
..
bea701b
100644
(file)
--- a/
gdb/testsuite/gdb.java/jv-exp.exp
+++ b/
gdb/testsuite/gdb.java/jv-exp.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/>.
# 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 "java.exp"
proc test_comparisons {} {
load_lib "java.exp"
proc test_comparisons {} {
diff --git
a/gdb/testsuite/gdb.java/jv-print.exp
b/gdb/testsuite/gdb.java/jv-print.exp
index
206e582
..
8d86841
100644
(file)
--- a/
gdb/testsuite/gdb.java/jv-print.exp
+++ b/
gdb/testsuite/gdb.java/jv-print.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/>.
# 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 "java.exp"
if { [skip_java_tests] } { continue }
load_lib "java.exp"
if { [skip_java_tests] } { continue }
diff --git
a/gdb/testsuite/gdb.mi/mi-pending.exp
b/gdb/testsuite/gdb.mi/mi-pending.exp
index
9137238
..
137e289
100644
(file)
--- a/
gdb/testsuite/gdb.mi/mi-pending.exp
+++ b/
gdb/testsuite/gdb.mi/mi-pending.exp
@@
-16,10
+16,6
@@
load_lib mi-support.exp
set MIFLAGS "-i=mi"
load_lib mi-support.exp
set MIFLAGS "-i=mi"
-if $tracelevel then {
- strace $tracelevel
-}
-
#
# test running programs
#
#
# test running programs
#
diff --git
a/gdb/testsuite/gdb.modula2/unbounded-array.exp
b/gdb/testsuite/gdb.modula2/unbounded-array.exp
index
485de0b
..
3ab17f6
100644
(file)
--- a/
gdb/testsuite/gdb.modula2/unbounded-array.exp
+++ b/
gdb/testsuite/gdb.modula2/unbounded-array.exp
@@
-17,10
+17,6
@@
# the elements of an unbounded array using the Modula-2 language mode of
# gdb.
# the elements of an unbounded array using the Modula-2 language mode of
# gdb.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "unbounded1"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "unbounded1"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.objc/basicclass.exp
b/gdb/testsuite/gdb.objc/basicclass.exp
index
18c373b
..
c1892ca
100644
(file)
--- a/
gdb/testsuite/gdb.objc/basicclass.exp
+++ b/
gdb/testsuite/gdb.objc/basicclass.exp
@@
-15,10
+15,6
@@
# This file was written by Adam Fedor (fedor@gnu.org)
# This file was written by Adam Fedor (fedor@gnu.org)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "basicclass"
set srcfile ${testfile}.m
set binfile ${objdir}/${subdir}/${testfile}
set testfile "basicclass"
set srcfile ${testfile}.m
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.objc/nondebug.exp
b/gdb/testsuite/gdb.objc/nondebug.exp
index
d901b81
..
ea775fc
100644
(file)
--- a/
gdb/testsuite/gdb.objc/nondebug.exp
+++ b/
gdb/testsuite/gdb.objc/nondebug.exp
@@
-17,10
+17,6
@@
# This file was written by Adam Fedor (fedor@gnu.org)
# This file was written by Adam Fedor (fedor@gnu.org)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "nondebug"
set srcfile ${testfile}.m
set binfile ${objdir}/${subdir}/${testfile}
set testfile "nondebug"
set srcfile ${testfile}.m
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.objc/objcdecode.exp
b/gdb/testsuite/gdb.objc/objcdecode.exp
index
e3bbb51
..
ba2085a
100644
(file)
--- a/
gdb/testsuite/gdb.objc/objcdecode.exp
+++ b/
gdb/testsuite/gdb.objc/objcdecode.exp
@@
-17,10
+17,6
@@
# This file was written by Adam Fedor (fedor@gnu.org)
# This file was written by Adam Fedor (fedor@gnu.org)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "objcdecode"
set srcfile ${testfile}.m
set binfile ${objdir}/${subdir}/${testfile}
set testfile "objcdecode"
set srcfile ${testfile}.m
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.objc/print.exp
b/gdb/testsuite/gdb.objc/print.exp
index
56725e1
..
96fb759
100644
(file)
--- a/
gdb/testsuite/gdb.objc/print.exp
+++ b/
gdb/testsuite/gdb.objc/print.exp
@@
-21,10
+21,6
@@
# Test printing of various values.
# NOTE: The tests here intentionally do not require an objc compiler.
# Test printing of various values.
# NOTE: The tests here intentionally do not require an objc compiler.
-if $tracelevel {
- strace $tracelevel
-}
-
load_lib "objc.exp"
proc test_float_accepted {} {
load_lib "objc.exp"
proc test_float_accepted {} {
diff --git
a/gdb/testsuite/gdb.opencl/callfuncs.exp
b/gdb/testsuite/gdb.opencl/callfuncs.exp
index
a311953
..
1ea11eb
100644
(file)
--- a/
gdb/testsuite/gdb.opencl/callfuncs.exp
+++ b/
gdb/testsuite/gdb.opencl/callfuncs.exp
@@
-17,10
+17,6
@@
#
# Tests OpenCL function calling conventions.
#
# Tests OpenCL function calling conventions.
-if $tracelevel {
- strace $tracelevel
-}
-
load_lib opencl.exp
if { [skip_opencl_tests] } {
load_lib opencl.exp
if { [skip_opencl_tests] } {
diff --git
a/gdb/testsuite/gdb.opencl/convs_casts.exp
b/gdb/testsuite/gdb.opencl/convs_casts.exp
index
d10d887
..
a230392
100644
(file)
--- a/
gdb/testsuite/gdb.opencl/convs_casts.exp
+++ b/
gdb/testsuite/gdb.opencl/convs_casts.exp
@@
-17,10
+17,6
@@
#
# Tests GDBs support for OpenCL type conversions and casts.
#
# Tests GDBs support for OpenCL type conversions and casts.
-if $tracelevel {
- strace $tracelevel
-}
-
load_lib opencl.exp
if { [skip_opencl_tests] } {
load_lib opencl.exp
if { [skip_opencl_tests] } {
diff --git
a/gdb/testsuite/gdb.opencl/datatypes.exp
b/gdb/testsuite/gdb.opencl/datatypes.exp
index
a50018d
..
2993539
100644
(file)
--- a/
gdb/testsuite/gdb.opencl/datatypes.exp
+++ b/
gdb/testsuite/gdb.opencl/datatypes.exp
@@
-17,10
+17,6
@@
#
# Tests OpenCL data types.
#
# Tests OpenCL data types.
-if $tracelevel {
- strace $tracelevel
-}
-
load_lib opencl.exp
if { [skip_opencl_tests] } {
load_lib opencl.exp
if { [skip_opencl_tests] } {
diff --git
a/gdb/testsuite/gdb.opencl/operators.exp
b/gdb/testsuite/gdb.opencl/operators.exp
index
910d4f1
..
6a698f3
100644
(file)
--- a/
gdb/testsuite/gdb.opencl/operators.exp
+++ b/
gdb/testsuite/gdb.opencl/operators.exp
@@
-17,10
+17,6
@@
#
# Tests GDBs support for OpenCL operators.
#
# Tests GDBs support for OpenCL operators.
-if $tracelevel {
- strace $tracelevel
-}
-
load_lib opencl.exp
if { [skip_opencl_tests] } {
load_lib opencl.exp
if { [skip_opencl_tests] } {
diff --git
a/gdb/testsuite/gdb.opencl/vec_comps.exp
b/gdb/testsuite/gdb.opencl/vec_comps.exp
index
eb26db4
..
0e699a1
100644
(file)
--- a/
gdb/testsuite/gdb.opencl/vec_comps.exp
+++ b/
gdb/testsuite/gdb.opencl/vec_comps.exp
@@
-17,10
+17,6
@@
#
# Tests component access of OpenCL vectors.
#
# Tests component access of OpenCL vectors.
-if $tracelevel {
- strace $tracelevel
-}
-
load_lib opencl.exp
if { [skip_opencl_tests] } {
load_lib opencl.exp
if { [skip_opencl_tests] } {
diff --git
a/gdb/testsuite/gdb.opt/clobbered-registers-O2.exp
b/gdb/testsuite/gdb.opt/clobbered-registers-O2.exp
index
b90c164
..
2559b3d
100644
(file)
--- a/
gdb/testsuite/gdb.opt/clobbered-registers-O2.exp
+++ b/
gdb/testsuite/gdb.opt/clobbered-registers-O2.exp
@@
-15,10
+15,6
@@
#
# This file is part of the gdb testsuite.
#
# This file is part of the gdb testsuite.
-if $tracelevel then {
- strace $tracelevel
-}
-
# Test displaying call clobbered registers in optimized binaries.
# GDB should not show incorrect values.
# Test displaying call clobbered registers in optimized binaries.
# GDB should not show incorrect values.
diff --git
a/gdb/testsuite/gdb.pascal/floats.exp
b/gdb/testsuite/gdb.pascal/floats.exp
index
6668666
..
e7122e7
100644
(file)
--- 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/>.
# 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"
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
(file)
--- 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/>.
# 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"
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
(file)
--- 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/>.
# 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"
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
(file)
--- 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/>.
# 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"
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
..
c390a7c
100644
(file)
--- 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.
# 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 {} {
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
(file)
--- 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
# (shebs@cygnus.com).
# Adapted to pascal by Pierre Muller
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib "pascal.exp"
proc test_integer_literal_types_accepted {} {
load_lib "pascal.exp"
proc test_integer_literal_types_accepted {} {
diff --git
a/gdb/testsuite/gdb.python/lib-types.exp
b/gdb/testsuite/gdb.python/lib-types.exp
index
ff14421
..
6be49e1
100644
(file)
--- a/
gdb/testsuite/gdb.python/lib-types.exp
+++ b/
gdb/testsuite/gdb.python/lib-types.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite.
# It tests the types.py module.
# This file is part of the GDB testsuite.
# It tests the types.py module.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "lib-types"
load_lib gdb-python.exp
set testfile "lib-types"
diff --git
a/gdb/testsuite/gdb.python/py-block.exp
b/gdb/testsuite/gdb.python/py-block.exp
index
4b995da
..
413e2e2
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-block.exp
+++ b/
gdb/testsuite/gdb.python/py-block.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "py-block"
load_lib gdb-python.exp
set testfile "py-block"
diff --git
a/gdb/testsuite/gdb.python/py-breakpoint.exp
b/gdb/testsuite/gdb.python/py-breakpoint.exp
index
8ed3742
..
f3d409e
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-breakpoint.exp
+++ b/
gdb/testsuite/gdb.python/py-breakpoint.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "py-breakpoint"
load_lib gdb-python.exp
set testfile "py-breakpoint"
diff --git
a/gdb/testsuite/gdb.python/py-cmd.exp
b/gdb/testsuite/gdb.python/py-cmd.exp
index
976adf6
..
fc7cac0
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-cmd.exp
+++ b/
gdb/testsuite/gdb.python/py-cmd.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# for defining new GDB commands in Python.
# This file is part of the GDB testsuite. It tests the mechanism
# for defining new GDB commands in Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
# Start with a fresh gdb.
load_lib gdb-python.exp
# Start with a fresh gdb.
diff --git
a/gdb/testsuite/gdb.python/py-events.exp
b/gdb/testsuite/gdb.python/py-events.exp
index
0715d3c
..
18d3380
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-events.exp
+++ b/
gdb/testsuite/gdb.python/py-events.exp
@@
-17,10
+17,6
@@
if [target_info exists use_gdb_stub] {
return 0
}
return 0
}
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set libfile "py-events-shlib"
load_lib gdb-python.exp
set libfile "py-events-shlib"
diff --git
a/gdb/testsuite/gdb.python/py-evsignal.exp
b/gdb/testsuite/gdb.python/py-evsignal.exp
index
35abddc
..
d3f819a
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-evsignal.exp
+++ b/
gdb/testsuite/gdb.python/py-evsignal.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/>.
# 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
-}
-
if {[is_remote target]} {
# RuntimeError: Could not find event thread
kfail "python/12966" "Signal Thread 3"
if {[is_remote target]} {
# RuntimeError: Could not find event thread
kfail "python/12966" "Signal Thread 3"
diff --git
a/gdb/testsuite/gdb.python/py-evthreads.exp
b/gdb/testsuite/gdb.python/py-evthreads.exp
index
2139c9a
..
8b540bd
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-evthreads.exp
+++ b/
gdb/testsuite/gdb.python/py-evthreads.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/>.
# 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
-}
-
if {[is_remote target]} {
# RuntimeError: Could not find event thread
kfail "python/12966" "Run to breakpoint 1"
if {[is_remote target]} {
# RuntimeError: Could not find event thread
kfail "python/12966" "Run to breakpoint 1"
diff --git
a/gdb/testsuite/gdb.python/py-finish-breakpoint.exp
b/gdb/testsuite/gdb.python/py-finish-breakpoint.exp
index
96ff971
..
c601e85
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-finish-breakpoint.exp
+++ b/
gdb/testsuite/gdb.python/py-finish-breakpoint.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
if {[skip_shlib_tests]} {
untested py-finish-breakpoint.exp
return 0
if {[skip_shlib_tests]} {
untested py-finish-breakpoint.exp
return 0
diff --git
a/gdb/testsuite/gdb.python/py-finish-breakpoint2.exp
b/gdb/testsuite/gdb.python/py-finish-breakpoint2.exp
index
9e65d6c
..
3174be1
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-finish-breakpoint2.exp
+++ b/
gdb/testsuite/gdb.python/py-finish-breakpoint2.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "py-finish-breakpoint2"
load_lib gdb-python.exp
set testfile "py-finish-breakpoint2"
diff --git
a/gdb/testsuite/gdb.python/py-frame.exp
b/gdb/testsuite/gdb.python/py-frame.exp
index
f3cb069
..
83ff8fe
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-frame.exp
+++ b/
gdb/testsuite/gdb.python/py-frame.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "py-frame"
load_lib gdb-python.exp
set testfile "py-frame"
diff --git
a/gdb/testsuite/gdb.python/py-function.exp
b/gdb/testsuite/gdb.python/py-function.exp
index
f813254
..
b0b35b7
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-function.exp
+++ b/
gdb/testsuite/gdb.python/py-function.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing convenience functions to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing convenience functions to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
# Start with a fresh gdb.
load_lib gdb-python.exp
# Start with a fresh gdb.
diff --git
a/gdb/testsuite/gdb.python/py-inferior.exp
b/gdb/testsuite/gdb.python/py-inferior.exp
index
6838138
..
ef737a4
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-inferior.exp
+++ b/
gdb/testsuite/gdb.python/py-inferior.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing inferiors to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing inferiors to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "py-inferior"
load_lib gdb-python.exp
set testfile "py-inferior"
diff --git
a/gdb/testsuite/gdb.python/py-infthread.exp
b/gdb/testsuite/gdb.python/py-infthread.exp
index
756a7d3
..
5fa508f
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-infthread.exp
+++ b/
gdb/testsuite/gdb.python/py-infthread.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing inferior threads to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing inferior threads to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "py-infthread"
load_lib gdb-python.exp
set testfile "py-infthread"
diff --git
a/gdb/testsuite/gdb.python/py-objfile-script.exp
b/gdb/testsuite/gdb.python/py-objfile-script.exp
index
2d6260c
..
4963206
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-objfile-script.exp
+++ b/
gdb/testsuite/gdb.python/py-objfile-script.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests automagic loading of
# -gdb.py scripts.
# This file is part of the GDB testsuite. It tests automagic loading of
# -gdb.py scripts.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "py-objfile-script"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "py-objfile-script"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.python/py-objfile.exp
b/gdb/testsuite/gdb.python/py-objfile.exp
index
ca74718
..
c277c59
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-objfile.exp
+++ b/
gdb/testsuite/gdb.python/py-objfile.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the program space
# support in Python.
# This file is part of the GDB testsuite. It tests the program space
# support in Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "py-objfile"
load_lib gdb-python.exp
set testfile "py-objfile"
diff --git
a/gdb/testsuite/gdb.python/py-parameter.exp
b/gdb/testsuite/gdb.python/py-parameter.exp
index
2985d68
..
08538ea
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-parameter.exp
+++ b/
gdb/testsuite/gdb.python/py-parameter.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite.
# It tests gdb.parameter and gdb.Parameter.
# This file is part of the GDB testsuite.
# It tests gdb.parameter and gdb.Parameter.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
# Start with a fresh gdb.
load_lib gdb-python.exp
# Start with a fresh gdb.
diff --git
a/gdb/testsuite/gdb.python/py-pp-maint.exp
b/gdb/testsuite/gdb.python/py-pp-maint.exp
index
1a2b213
..
3115b56
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-pp-maint.exp
+++ b/
gdb/testsuite/gdb.python/py-pp-maint.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests Python-based
# pretty-printing for the CLI.
# This file is part of the GDB testsuite. It tests Python-based
# pretty-printing for the CLI.
-if $tracelevel then {
- strace $tracelevel
-}
-
if [is_remote host] {
untested "py-pp-maint.exp can only be run locally"
return -1
if [is_remote host] {
untested "py-pp-maint.exp can only be run locally"
return -1
diff --git
a/gdb/testsuite/gdb.python/py-prettyprint.exp
b/gdb/testsuite/gdb.python/py-prettyprint.exp
index
dc4116b
..
e61422a
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-prettyprint.exp
+++ b/
gdb/testsuite/gdb.python/py-prettyprint.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests Python-based
# pretty-printing for the CLI.
# This file is part of the GDB testsuite. It tests Python-based
# pretty-printing for the CLI.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "py-prettyprint"
load_lib gdb-python.exp
set testfile "py-prettyprint"
diff --git
a/gdb/testsuite/gdb.python/py-progspace.exp
b/gdb/testsuite/gdb.python/py-progspace.exp
index
1d08325
..
c53cf37
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-progspace.exp
+++ b/
gdb/testsuite/gdb.python/py-progspace.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the program space
# support in Python.
# This file is part of the GDB testsuite. It tests the program space
# support in Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "py-progspace"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "py-progspace"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.python/py-prompt.exp
b/gdb/testsuite/gdb.python/py-prompt.exp
index
4d71090
..
eacb074
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-prompt.exp
+++ b/
gdb/testsuite/gdb.python/py-prompt.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# for defining the prompt in Python.
# This file is part of the GDB testsuite. It tests the mechanism
# for defining the prompt in Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "py-prompt"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "py-prompt"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.python/py-section-script.exp
b/gdb/testsuite/gdb.python/py-section-script.exp
index
56fd792
..
9846ce8
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-section-script.exp
+++ b/
gdb/testsuite/gdb.python/py-section-script.exp
@@
-29,10
+29,6
@@
if {![istarget *-*-linux*]
return
}
return
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "py-section-script"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "py-section-script"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.python/py-symbol.exp
b/gdb/testsuite/gdb.python/py-symbol.exp
index
aa952fb
..
b0e73c3
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-symbol.exp
+++ b/
gdb/testsuite/gdb.python/py-symbol.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "py-symbol"
load_lib gdb-python.exp
set testfile "py-symbol"
diff --git
a/gdb/testsuite/gdb.python/py-symtab.exp
b/gdb/testsuite/gdb.python/py-symtab.exp
index
1e55fd3
..
f64cb57
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-symtab.exp
+++ b/
gdb/testsuite/gdb.python/py-symtab.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "py-symbol"
load_lib gdb-python.exp
set testfile "py-symbol"
diff --git
a/gdb/testsuite/gdb.python/py-template.exp
b/gdb/testsuite/gdb.python/py-template.exp
index
5fc8234
..
8805611
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-template.exp
+++ b/
gdb/testsuite/gdb.python/py-template.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
if { [skip_cplus_tests] } { continue }
set testfile "py-template"
if { [skip_cplus_tests] } { continue }
set testfile "py-template"
diff --git
a/gdb/testsuite/gdb.python/py-type.exp
b/gdb/testsuite/gdb.python/py-type.exp
index
93990a9
..
e4729ad
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-type.exp
+++ b/
gdb/testsuite/gdb.python/py-type.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# of exposing types to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# of exposing types to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "py-type"
load_lib gdb-python.exp
set testfile "py-type"
diff --git
a/gdb/testsuite/gdb.python/py-value.exp
b/gdb/testsuite/gdb.python/py-value.exp
index
038361e
..
c9d8c97
100644
(file)
--- a/
gdb/testsuite/gdb.python/py-value.exp
+++ b/
gdb/testsuite/gdb.python/py-value.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "py-value"
load_lib gdb-python.exp
set testfile "py-value"
diff --git
a/gdb/testsuite/gdb.python/python.exp
b/gdb/testsuite/gdb.python/python.exp
index
42036df
..
2708dcc
100644
(file)
--- a/
gdb/testsuite/gdb.python/python.exp
+++ b/
gdb/testsuite/gdb.python/python.exp
@@
-16,10
+16,6
@@
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
# This file is part of the GDB testsuite. It tests the mechanism
# exposing values to Python.
-if $tracelevel then {
- strace $tracelevel
-}
-
load_lib gdb-python.exp
set testfile "python"
load_lib gdb-python.exp
set testfile "python"
diff --git
a/gdb/testsuite/gdb.reverse/i386-precsave.exp
b/gdb/testsuite/gdb.reverse/i386-precsave.exp
index
a627223
..
760225f
100644
(file)
--- a/
gdb/testsuite/gdb.reverse/i386-precsave.exp
+++ b/
gdb/testsuite/gdb.reverse/i386-precsave.exp
@@
-24,10
+24,6
@@
if ![supports_process_record] {
return
}
return
}
-if $tracelevel {
- strace $tracelevel
-}
-
if ![istarget "i?86-*linux*"] then {
verbose "Skipping i386 reverse tests."
if ![istarget "i?86-*linux*"] then {
verbose "Skipping i386 reverse tests."
diff --git
a/gdb/testsuite/gdb.reverse/i386-reverse.exp
b/gdb/testsuite/gdb.reverse/i386-reverse.exp
index
e85905d
..
8a4e9b3
100644
(file)
--- a/
gdb/testsuite/gdb.reverse/i386-reverse.exp
+++ b/
gdb/testsuite/gdb.reverse/i386-reverse.exp
@@
-23,10
+23,6
@@
if ![supports_reverse] {
return
}
return
}
-if $tracelevel {
- strace $tracelevel
-}
-
if ![istarget "i?86-*linux*"] then {
verbose "Skipping i386 reverse tests."
if ![istarget "i?86-*linux*"] then {
verbose "Skipping i386 reverse tests."
diff --git
a/gdb/testsuite/gdb.reverse/i386-sse-reverse.exp
b/gdb/testsuite/gdb.reverse/i386-sse-reverse.exp
index
530b2aa
..
0b0f7cc
100644
(file)
--- a/
gdb/testsuite/gdb.reverse/i386-sse-reverse.exp
+++ b/
gdb/testsuite/gdb.reverse/i386-sse-reverse.exp
@@
-23,10
+23,6
@@
if ![supports_reverse] {
return
}
return
}
-if $tracelevel {
- strace $tracelevel
-}
-
if ![istarget "*86*-*linux*"] then {
verbose "Skipping i386 reverse tests."
if ![istarget "*86*-*linux*"] then {
verbose "Skipping i386 reverse tests."
diff --git
a/gdb/testsuite/gdb.reverse/i387-env-reverse.exp
b/gdb/testsuite/gdb.reverse/i387-env-reverse.exp
index
097df64
..
0a105fd
100644
(file)
--- a/
gdb/testsuite/gdb.reverse/i387-env-reverse.exp
+++ b/
gdb/testsuite/gdb.reverse/i387-env-reverse.exp
@@
-15,10
+15,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
if ![istarget "i?86-*linux*"] then {
verbose "Skipping i387 reverse float tests."
if ![istarget "i?86-*linux*"] then {
verbose "Skipping i387 reverse float tests."
diff --git
a/gdb/testsuite/gdb.reverse/i387-stack-reverse.exp
b/gdb/testsuite/gdb.reverse/i387-stack-reverse.exp
index
8660ac9
..
98bc712
100644
(file)
--- a/
gdb/testsuite/gdb.reverse/i387-stack-reverse.exp
+++ b/
gdb/testsuite/gdb.reverse/i387-stack-reverse.exp
@@
-15,10
+15,6
@@
# This file is part of the gdb testsuite.
# This file is part of the gdb testsuite.
-if $tracelevel {
- strace $tracelevel
-}
-
if ![istarget "i?86-*linux*"] then {
verbose "Skipping i387 reverse float tests."
if ![istarget "i?86-*linux*"] then {
verbose "Skipping i387 reverse float tests."
diff --git
a/gdb/testsuite/gdb.reverse/sigall-precsave.exp
b/gdb/testsuite/gdb.reverse/sigall-precsave.exp
index
6916278
..
8145da2
100644
(file)
--- a/
gdb/testsuite/gdb.reverse/sigall-precsave.exp
+++ b/
gdb/testsuite/gdb.reverse/sigall-precsave.exp
@@
-22,10
+22,6
@@
if ![supports_reverse] {
return
}
return
}
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.reverse/sigall-reverse.exp
b/gdb/testsuite/gdb.reverse/sigall-reverse.exp
index
12362de
..
791233d
100644
(file)
--- a/
gdb/testsuite/gdb.reverse/sigall-reverse.exp
+++ b/
gdb/testsuite/gdb.reverse/sigall-reverse.exp
@@
-22,10
+22,6
@@
if ![supports_reverse] {
return
}
return
}
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.stabs/exclfwd.exp
b/gdb/testsuite/gdb.stabs/exclfwd.exp
index
92df6f9
..
8e81440
100644
(file)
--- a/
gdb/testsuite/gdb.stabs/exclfwd.exp
+++ b/
gdb/testsuite/gdb.stabs/exclfwd.exp
@@
-16,10
+16,6
@@
# Please email any bugs, comments, and/or additions to this file to:
# bug-gdb@gnu.org
# Please email any bugs, comments, and/or additions to this file to:
# bug-gdb@gnu.org
-if $tracelevel {
- strace $tracelevel
-}
-
# If the test directory was not created by configure then skip
# this test.
if ![file isdirectory ${objdir}/${subdir}] then {
# If the test directory was not created by configure then skip
# this test.
if ![file isdirectory ${objdir}/${subdir}] then {
diff --git
a/gdb/testsuite/gdb.stabs/gdb11479.exp
b/gdb/testsuite/gdb.stabs/gdb11479.exp
index
1dd70d7
..
f24d054
100644
(file)
--- a/
gdb/testsuite/gdb.stabs/gdb11479.exp
+++ b/
gdb/testsuite/gdb.stabs/gdb11479.exp
@@
-17,10
+17,6
@@
# Test GDB stabs problem with qualified parameter of forward types.
# Test GDB stabs problem with qualified parameter of forward types.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "gdb11479"
set testfile "gdb11479"
diff --git
a/gdb/testsuite/gdb.stabs/weird.exp
b/gdb/testsuite/gdb.stabs/weird.exp
index
1569cdb
..
80bc284
100644
(file)
--- a/
gdb/testsuite/gdb.stabs/weird.exp
+++ b/
gdb/testsuite/gdb.stabs/weird.exp
@@
-17,10
+17,6
@@
# Test that GDB properly ignores invalid stabs.
# Also test that GDB can debug a .o file, and that it doesn't mind
# a file that's more minimal than what a compiler normally puts out.
# Test that GDB properly ignores invalid stabs.
# Also test that GDB can debug a .o file, and that it doesn't mind
# a file that's more minimal than what a compiler normally puts out.
-if $tracelevel then {
- strace $tracelevel
-}
-
# If the test directory was not created by configure then skip
# this test.
if ![file isdirectory ${objdir}/${subdir}] then {
# If the test directory was not created by configure then skip
# this test.
if ![file isdirectory ${objdir}/${subdir}] then {
diff --git
a/gdb/testsuite/gdb.threads/bp_in_thread.exp
b/gdb/testsuite/gdb.threads/bp_in_thread.exp
index
ef8cc3f
..
0ec7054
100644
(file)
--- a/
gdb/testsuite/gdb.threads/bp_in_thread.exp
+++ b/
gdb/testsuite/gdb.threads/bp_in_thread.exp
@@
-18,10
+18,6
@@
# GDB reported a SIGTRAP signal in a random thread when hitting
# a breakpoint.
# GDB reported a SIGTRAP signal in a random thread when hitting
# a breakpoint.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "bp_in_thread"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "bp_in_thread"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.threads/gcore-thread.exp
b/gdb/testsuite/gdb.threads/gcore-thread.exp
index
62d6af1
..
dfb2314
100644
(file)
--- a/
gdb/testsuite/gdb.threads/gcore-thread.exp
+++ b/
gdb/testsuite/gdb.threads/gcore-thread.exp
@@
-16,10
+16,6
@@
# This file was written by Michael Snyder (msnyder@redhat.com)
# This is a test for the gdb command "generate-core-file".
# This file was written by Michael Snyder (msnyder@redhat.com)
# This is a test for the gdb command "generate-core-file".
-if $tracelevel then {
- strace $tracelevel
-}
-
# Single-threaded test case
set testfile "gcore-thread"
set srcfile pthreads.c
# Single-threaded test case
set testfile "gcore-thread"
set srcfile pthreads.c
diff --git
a/gdb/testsuite/gdb.threads/hand-call-in-threads.exp
b/gdb/testsuite/gdb.threads/hand-call-in-threads.exp
index
707fb44
..
ba0e74b
100644
(file)
--- a/
gdb/testsuite/gdb.threads/hand-call-in-threads.exp
+++ b/
gdb/testsuite/gdb.threads/hand-call-in-threads.exp
@@
-18,10
+18,6
@@
set NR_THREADS 4
set NR_THREADS 4
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "hand-call-in-threads"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "hand-call-in-threads"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.threads/interrupted-hand-call.exp
b/gdb/testsuite/gdb.threads/interrupted-hand-call.exp
index
8c22bd3
..
926c612
100644
(file)
--- a/
gdb/testsuite/gdb.threads/interrupted-hand-call.exp
+++ b/
gdb/testsuite/gdb.threads/interrupted-hand-call.exp
@@
-19,10
+19,6
@@
set NR_THREADS 4
set NR_THREADS 4
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "interrupted-hand-call"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "interrupted-hand-call"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.threads/killed.exp
b/gdb/testsuite/gdb.threads/killed.exp
index
c9c6397
..
fa99e6e
100644
(file)
--- a/
gdb/testsuite/gdb.threads/killed.exp
+++ b/
gdb/testsuite/gdb.threads/killed.exp
@@
-54,10
+54,6
@@
# [7]+ Killed $D6/gdb/gdb -nw killed
# $
# [7]+ Killed $D6/gdb/gdb -nw killed
# $
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "killed"
set srcfile ${testfile}.c
set testfile "killed"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.threads/linux-dp.exp
b/gdb/testsuite/gdb.threads/linux-dp.exp
index
b211aa2
..
d7fa125
100644
(file)
--- a/
gdb/testsuite/gdb.threads/linux-dp.exp
+++ b/
gdb/testsuite/gdb.threads/linux-dp.exp
@@
-33,10
+33,6
@@
### killing and restarting
### quitting gracefully
### killing and restarting
### quitting gracefully
-if $tracelevel then {
- strace $tracelevel
-}
-
# This only works with Linux configurations.
if ![istarget *-*-linux-gnu*] then {
# This only works with Linux configurations.
if ![istarget *-*-linux-gnu*] then {
diff --git
a/gdb/testsuite/gdb.threads/manythreads.exp
b/gdb/testsuite/gdb.threads/manythreads.exp
index
1c13b42
..
42333e6
100644
(file)
--- a/
gdb/testsuite/gdb.threads/manythreads.exp
+++ b/
gdb/testsuite/gdb.threads/manythreads.exp
@@
-16,10
+16,6
@@
# This file was written by Jeff Johnston. (jjohnstn@redhat.com)
# This file was written by Jeff Johnston. (jjohnstn@redhat.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "manythreads"
set srcfile ${testfile}.c
set testfile "manythreads"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.threads/print-threads.exp
b/gdb/testsuite/gdb.threads/print-threads.exp
index
97c8cf6
..
b5a99fe
100644
(file)
--- a/
gdb/testsuite/gdb.threads/print-threads.exp
+++ b/
gdb/testsuite/gdb.threads/print-threads.exp
@@
-20,10
+20,6
@@
# It tests miscellaneous actions with multiple threads, including
# handling for thread exit.
# It tests miscellaneous actions with multiple threads, including
# handling for thread exit.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "print-threads"
set srcfile ${testfile}.c
set testfile "print-threads"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.threads/pthread_cond_wait.exp
b/gdb/testsuite/gdb.threads/pthread_cond_wait.exp
index
283545a
..
fc2942e
100644
(file)
--- a/
gdb/testsuite/gdb.threads/pthread_cond_wait.exp
+++ b/
gdb/testsuite/gdb.threads/pthread_cond_wait.exp
@@
-19,10
+19,6
@@
# This file verifies that GDB is able to compute a backtrace for a thread
# being blocked on a call to pthread_cond_wait().
# This file verifies that GDB is able to compute a backtrace for a thread
# being blocked on a call to pthread_cond_wait().
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "pthread_cond_wait"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "pthread_cond_wait"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.threads/pthreads.exp
b/gdb/testsuite/gdb.threads/pthreads.exp
index
31008ca
..
e216993
100644
(file)
--- a/
gdb/testsuite/gdb.threads/pthreads.exp
+++ b/
gdb/testsuite/gdb.threads/pthreads.exp
@@
-16,10
+16,6
@@
# This file was written by Fred Fish. (fnf@cygnus.com)
# This file was written by Fred Fish. (fnf@cygnus.com)
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "pthreads"
set srcfile ${testfile}.c
set testfile "pthreads"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.threads/schedlock.exp
b/gdb/testsuite/gdb.threads/schedlock.exp
index
2c34a89
..
522559c
100644
(file)
--- a/
gdb/testsuite/gdb.threads/schedlock.exp
+++ b/
gdb/testsuite/gdb.threads/schedlock.exp
@@
-19,10
+19,6
@@
#
# This test covers the various forms of "set scheduler-locking".
#
# This test covers the various forms of "set scheduler-locking".
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "schedlock"
set srcfile ${testfile}.c
set testfile "schedlock"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.threads/staticthreads.exp
b/gdb/testsuite/gdb.threads/staticthreads.exp
index
bb65156
..
a073d55
100644
(file)
--- a/
gdb/testsuite/gdb.threads/staticthreads.exp
+++ b/
gdb/testsuite/gdb.threads/staticthreads.exp
@@
-18,10
+18,6
@@
# Based on manythreads written by Jeff Johnston, contributed by Red
# Hat.
# Based on manythreads written by Jeff Johnston, contributed by Red
# Hat.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "staticthreads"
set srcfile ${testfile}.c
set testfile "staticthreads"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.threads/step.exp
b/gdb/testsuite/gdb.threads/step.exp
index
6b6d2cc
..
1f370f0
100644
(file)
--- a/
gdb/testsuite/gdb.threads/step.exp
+++ b/
gdb/testsuite/gdb.threads/step.exp
@@
-33,10
+33,6
@@
# catch the fact it continued rather than stepped)
# catch the fact it continued rather than stepped)
-if $tracelevel then {
- strace $tracelevel
-}
-
set program_exited 0
proc set_bp { where } {
set program_exited 0
proc set_bp { where } {
diff --git
a/gdb/testsuite/gdb.threads/step2.exp
b/gdb/testsuite/gdb.threads/step2.exp
index
42a279b
..
811f95a
100644
(file)
--- a/
gdb/testsuite/gdb.threads/step2.exp
+++ b/
gdb/testsuite/gdb.threads/step2.exp
@@
-18,10
+18,6
@@
#
#
-if $tracelevel then {
- strace $tracelevel
-}
-
set program_exited 0
# A simple and crude test to see that we can step two threads independently
set program_exited 0
# A simple and crude test to see that we can step two threads independently
diff --git
a/gdb/testsuite/gdb.threads/switch-threads.exp
b/gdb/testsuite/gdb.threads/switch-threads.exp
index
7a0e261
..
1561e5b
100644
(file)
--- a/
gdb/testsuite/gdb.threads/switch-threads.exp
+++ b/
gdb/testsuite/gdb.threads/switch-threads.exp
@@
-23,10
+23,6
@@
# TODO: we should also test explicitly changing threads with the "thread"
# command.
# TODO: we should also test explicitly changing threads with the "thread"
# command.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "switch-threads"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "switch-threads"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.threads/thread-find.exp
b/gdb/testsuite/gdb.threads/thread-find.exp
index
cce83fc
..
f39886c
100644
(file)
--- a/
gdb/testsuite/gdb.threads/thread-find.exp
+++ b/
gdb/testsuite/gdb.threads/thread-find.exp
@@
-16,10
+16,6
@@
# Please email any bugs, comments, and/or additions to this file to:
# bug-gdb@gnu.org
# Please email any bugs, comments, and/or additions to this file to:
# bug-gdb@gnu.org
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "linux-dp"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "linux-dp"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.threads/thread-specific.exp
b/gdb/testsuite/gdb.threads/thread-specific.exp
index
d914fe2
..
6e22dde
100644
(file)
--- a/
gdb/testsuite/gdb.threads/thread-specific.exp
+++ b/
gdb/testsuite/gdb.threads/thread-specific.exp
@@
-17,10
+17,6
@@
# It tests that the correct breakpoint is reported when we hit a
# thread-specific breakpoint inserted for several threads.
# It tests that the correct breakpoint is reported when we hit a
# thread-specific breakpoint inserted for several threads.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "thread-specific"
set srcfile ${testfile}.c
set testfile "thread-specific"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.threads/thread-unwindonsignal.exp
b/gdb/testsuite/gdb.threads/thread-unwindonsignal.exp
index
302a9d1
..
bacbe4c
100644
(file)
--- a/
gdb/testsuite/gdb.threads/thread-unwindonsignal.exp
+++ b/
gdb/testsuite/gdb.threads/thread-unwindonsignal.exp
@@
-18,10
+18,6
@@
set NR_THREADS 4
set NR_THREADS 4
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "interrupted-hand-call"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
set testfile "interrupted-hand-call"
set srcfile ${testfile}.c
set binfile ${objdir}/${subdir}/${testfile}
diff --git
a/gdb/testsuite/gdb.threads/thread_check.exp
b/gdb/testsuite/gdb.threads/thread_check.exp
index
18446ca
..
1a4526d
100644
(file)
--- a/
gdb/testsuite/gdb.threads/thread_check.exp
+++ b/
gdb/testsuite/gdb.threads/thread_check.exp
@@
-31,10
+31,6
@@
# - delete all breakpoints
# - exit gdb.
# - delete all breakpoints
# - exit gdb.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "thread_check"
set srcfile ${testfile}.c
set testfile "thread_check"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.threads/thread_events.exp
b/gdb/testsuite/gdb.threads/thread_events.exp
index
176c90b
..
2b69eb8
100644
(file)
--- a/
gdb/testsuite/gdb.threads/thread_events.exp
+++ b/
gdb/testsuite/gdb.threads/thread_events.exp
@@
-33,10
+33,6
@@
if [is_remote target] then {
return
}
return
}
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "thread_events"
set srcfile ${testfile}.c
set testfile "thread_events"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.threads/threadapply.exp
b/gdb/testsuite/gdb.threads/threadapply.exp
index
7ec3f67
..
a46ceeb
100644
(file)
--- a/
gdb/testsuite/gdb.threads/threadapply.exp
+++ b/
gdb/testsuite/gdb.threads/threadapply.exp
@@
-15,10
+15,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/>.
# 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 {
- strace $tracelevel
-}
-
# This test verifies that a macro using backtrace can be applied to all threads
# and will continue for each thread even though an error may occur in
# This test verifies that a macro using backtrace can be applied to all threads
# and will continue for each thread even though an error may occur in
diff --git
a/gdb/testsuite/gdb.threads/tls-shared.exp
b/gdb/testsuite/gdb.threads/tls-shared.exp
index
ac3c4c5
..
f645729
100644
(file)
--- a/
gdb/testsuite/gdb.threads/tls-shared.exp
+++ b/
gdb/testsuite/gdb.threads/tls-shared.exp
@@
-16,10
+16,6
@@
# tls-shared.exp -- Expect script to test thread local storage in gdb, with
# shared libraries.
# tls-shared.exp -- Expect script to test thread local storage in gdb, with
# shared libraries.
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile tls-main
set libfile tls-shared
set srcfile ${testfile}.c
set testfile tls-main
set libfile tls-shared
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.threads/watchthreads.exp
b/gdb/testsuite/gdb.threads/watchthreads.exp
index
d9fc87c
..
c18505e
100644
(file)
--- a/
gdb/testsuite/gdb.threads/watchthreads.exp
+++ b/
gdb/testsuite/gdb.threads/watchthreads.exp
@@
-17,10
+17,6
@@
# Check that GDB can support multiple watchpoints across threads.
# Check that GDB can support multiple watchpoints across threads.
-if $tracelevel {
- strace $tracelevel
-}
-
# This test verifies that a watchpoint is detected in the proper thread
# so the test is only meaningful on a system with hardware watchpoints.
# This test verifies that a watchpoint is detected in the proper thread
# so the test is only meaningful on a system with hardware watchpoints.
diff --git
a/gdb/testsuite/gdb.threads/watchthreads2.exp
b/gdb/testsuite/gdb.threads/watchthreads2.exp
index
ef4fa29
..
aaa3430
100644
(file)
--- a/
gdb/testsuite/gdb.threads/watchthreads2.exp
+++ b/
gdb/testsuite/gdb.threads/watchthreads2.exp
@@
-21,10
+21,6
@@
set NR_THREADS 4
set X_INCR_COUNT 10
set NR_THREADS 4
set X_INCR_COUNT 10
-if $tracelevel {
- strace $tracelevel
-}
-
# This test verifies that a watchpoint is detected in the proper thread
# so the test is only meaningful on a system with hardware watchpoints.
# This test verifies that a watchpoint is detected in the proper thread
# so the test is only meaningful on a system with hardware watchpoints.
diff --git
a/gdb/testsuite/gdb.trace/actions.exp
b/gdb/testsuite/gdb.trace/actions.exp
index
e337fb3
..
18c778a
100644
(file)
--- a/
gdb/testsuite/gdb.trace/actions.exp
+++ b/
gdb/testsuite/gdb.trace/actions.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/ax.exp
b/gdb/testsuite/gdb.trace/ax.exp
index
2b2a1cd
..
aa25f6c
100644
(file)
--- a/
gdb/testsuite/gdb.trace/ax.exp
+++ b/
gdb/testsuite/gdb.trace/ax.exp
@@
-20,10
+20,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/backtrace.exp
b/gdb/testsuite/gdb.trace/backtrace.exp
index
07aed30
..
f683442
100644
(file)
--- a/
gdb/testsuite/gdb.trace/backtrace.exp
+++ b/
gdb/testsuite/gdb.trace/backtrace.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/change-loc.exp
b/gdb/testsuite/gdb.trace/change-loc.exp
index
ec3c555
..
451a0e1
100644
(file)
--- a/
gdb/testsuite/gdb.trace/change-loc.exp
+++ b/
gdb/testsuite/gdb.trace/change-loc.exp
@@
-14,10
+14,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
if {[skip_shlib_tests]} {
return 0
}
if {[skip_shlib_tests]} {
return 0
}
diff --git
a/gdb/testsuite/gdb.trace/circ.exp
b/gdb/testsuite/gdb.trace/circ.exp
index
a0c8e8d
..
61a5235
100644
(file)
--- a/
gdb/testsuite/gdb.trace/circ.exp
+++ b/
gdb/testsuite/gdb.trace/circ.exp
@@
-15,10
+15,6
@@
load_lib "trace-support.exp"
load_lib "trace-support.exp"
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "circ"
set srcfile ${testfile}.c
set testfile "circ"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.trace/collection.exp
b/gdb/testsuite/gdb.trace/collection.exp
index
c80334b
..
9398248
100644
(file)
--- a/
gdb/testsuite/gdb.trace/collection.exp
+++ b/
gdb/testsuite/gdb.trace/collection.exp
@@
-15,10
+15,6
@@
load_lib "trace-support.exp"
load_lib "trace-support.exp"
-if $tracelevel then {
- strace $tracelevel
-}
-
set testfile "collection"
set srcfile ${testfile}.c
set testfile "collection"
set srcfile ${testfile}.c
diff --git
a/gdb/testsuite/gdb.trace/deltrace.exp
b/gdb/testsuite/gdb.trace/deltrace.exp
index
3664d7a
..
6baf1d2
100644
(file)
--- a/
gdb/testsuite/gdb.trace/deltrace.exp
+++ b/
gdb/testsuite/gdb.trace/deltrace.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/infotrace.exp
b/gdb/testsuite/gdb.trace/infotrace.exp
index
f8237e7
..
5a99d16
100644
(file)
--- a/
gdb/testsuite/gdb.trace/infotrace.exp
+++ b/
gdb/testsuite/gdb.trace/infotrace.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/packetlen.exp
b/gdb/testsuite/gdb.trace/packetlen.exp
index
e9e42b8
..
ccc4384
100644
(file)
--- a/
gdb/testsuite/gdb.trace/packetlen.exp
+++ b/
gdb/testsuite/gdb.trace/packetlen.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp"
load_lib "trace-support.exp"
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/passc-dyn.exp
b/gdb/testsuite/gdb.trace/passc-dyn.exp
index
b8d3a14
..
1ec120e
100644
(file)
--- a/
gdb/testsuite/gdb.trace/passc-dyn.exp
+++ b/
gdb/testsuite/gdb.trace/passc-dyn.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/passcount.exp
b/gdb/testsuite/gdb.trace/passcount.exp
index
b91cdbd
..
a56c846
100644
(file)
--- a/
gdb/testsuite/gdb.trace/passcount.exp
+++ b/
gdb/testsuite/gdb.trace/passcount.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/pending.exp
b/gdb/testsuite/gdb.trace/pending.exp
index
3b246c9
..
9dc8706
100644
(file)
--- a/
gdb/testsuite/gdb.trace/pending.exp
+++ b/
gdb/testsuite/gdb.trace/pending.exp
@@
-14,10
+14,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
if {[skip_shlib_tests]} {
return 0
}
if {[skip_shlib_tests]} {
return 0
}
diff --git
a/gdb/testsuite/gdb.trace/report.exp
b/gdb/testsuite/gdb.trace/report.exp
index
2d9d785
..
2f2962a
100644
(file)
--- a/
gdb/testsuite/gdb.trace/report.exp
+++ b/
gdb/testsuite/gdb.trace/report.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/save-trace.exp
b/gdb/testsuite/gdb.trace/save-trace.exp
index
d0db3a6
..
e5cada7
100644
(file)
--- a/
gdb/testsuite/gdb.trace/save-trace.exp
+++ b/
gdb/testsuite/gdb.trace/save-trace.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/strace.exp
b/gdb/testsuite/gdb.trace/strace.exp
index
5348432
..
4d6ea10
100644
(file)
--- a/
gdb/testsuite/gdb.trace/strace.exp
+++ b/
gdb/testsuite/gdb.trace/strace.exp
@@
-14,10
+14,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
if {[skip_shlib_tests]} {
return 0
}
if {[skip_shlib_tests]} {
return 0
}
diff --git
a/gdb/testsuite/gdb.trace/tfile.exp
b/gdb/testsuite/gdb.trace/tfile.exp
index
7e996a4
..
391dfbb
100644
(file)
--- a/
gdb/testsuite/gdb.trace/tfile.exp
+++ b/
gdb/testsuite/gdb.trace/tfile.exp
@@
-27,10
+27,6
@@
if [target_info exists gdb,nofileio] {
continue
}
continue
}
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/tfind.exp
b/gdb/testsuite/gdb.trace/tfind.exp
index
8e9d066
..
ec0ba11
100644
(file)
--- a/
gdb/testsuite/gdb.trace/tfind.exp
+++ b/
gdb/testsuite/gdb.trace/tfind.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/tracecmd.exp
b/gdb/testsuite/gdb.trace/tracecmd.exp
index
10cf27f
..
1581166
100644
(file)
--- a/
gdb/testsuite/gdb.trace/tracecmd.exp
+++ b/
gdb/testsuite/gdb.trace/tracecmd.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/tsv.exp
b/gdb/testsuite/gdb.trace/tsv.exp
index
4fc180d
..
373bc42
100644
(file)
--- a/
gdb/testsuite/gdb.trace/tsv.exp
+++ b/
gdb/testsuite/gdb.trace/tsv.exp
@@
-15,10
+15,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/while-dyn.exp
b/gdb/testsuite/gdb.trace/while-dyn.exp
index
547f0b8
..
f71f3a4
100644
(file)
--- a/
gdb/testsuite/gdb.trace/while-dyn.exp
+++ b/
gdb/testsuite/gdb.trace/while-dyn.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp"
load_lib "trace-support.exp"
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start
diff --git
a/gdb/testsuite/gdb.trace/while-stepping.exp
b/gdb/testsuite/gdb.trace/while-stepping.exp
index
0ee27fd
..
0e53815
100644
(file)
--- a/
gdb/testsuite/gdb.trace/while-stepping.exp
+++ b/
gdb/testsuite/gdb.trace/while-stepping.exp
@@
-17,10
+17,6
@@
load_lib "trace-support.exp";
load_lib "trace-support.exp";
-if $tracelevel then {
- strace $tracelevel
-}
-
gdb_exit
gdb_start
gdb_exit
gdb_start