diff --git a/run_build.pl b/run_build.pl index be167e6..1e8dc8f 100755 --- a/run_build.pl +++ b/run_build.pl @@ -1188,11 +1188,15 @@ sub get_stack_trace my $status = $? >>8; return () if $status; + open(GDBCMD, '>gdbcmd'); + print GDBCMD "bt\n"; + close(GDBCMD); + my @trace; foreach my $core (@cores) { - my @onetrace = `gdb -ex bt --batch $bindir/postgres $core 2>&1`; + my @onetrace = `gdb -x gdbcmd --batch $bindir/postgres $core 2>&1`; push(@trace, "\n\n================== stack trace: $core ==================\n", @onetrace);