Re: Ada compile with -fvar-tracking

Carl Love
2023-11-14T22:23:54Z

Tom:

I have attached the patch, followed by the entire log file. Hopefully
you can see something I am missing. Thanks for the help.

Carl
---------------------------------------------
[PATCH] tom suggestion

Gives compile failed
---
gdb/testsuite/gdb.ada/finish-large.exp | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/gdb/testsuite/gdb.ada/finish-large.exp b/gdb/testsuite/gdb.ada/finish-large.exp
index 5661d132a18..d15697042a8 100644
--- a/gdb/testsuite/gdb.ada/finish-large.exp
+++ b/gdb/testsuite/gdb.ada/finish-large.exp
@@ -19,7 +19,9 @@ require allow_ada_tests

standard_ada_testfile p

-if {[gdb_compile_ada "${srcfile}" "${binfile}" executable debug] != ""} {
+set flags {debug additional_flags=-cargs additional_flags=-fvar-tracking additional_flags=-margs}
+
+if {[gdb_compile_ada "${srcfile}" "${binfile} " executable $flags] != ""} {
return -1
}

--
2.41.0

-------------------------------------------------------------
Test run by carll on Tue Nov 14 17:17:50 2023
Native configuration is powerpc64le-unknown-linux-gnu

=== gdb tests ===

Schedule of variations:
unix

Running target unix
Using /usr/share/dejagnu/baseboards/unix.exp as board description file for target.
Using /usr/share/dejagnu/config/unix.exp as generic interface file for target.
Using /home/carll/GDB/build-ada/gdb/testsuite/../../../binutils-gdb-ada/gdb/testsuite/config/unix.exp as tool-and-target-specific interface file.
Running /home/carll/GDB/build-ada/gdb/testsuite/../../../binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large.exp ...
Executing on build: rm -rf /home/carll/GDB/build-ada/gdb/testsuite/outputs/gdb.ada/finish-large (timeout = 300)
builtin_spawn -ignore SIGHUP rm -rf /home/carll/GDB/build-ada/gdb/testsuite/outputs/gdb.ada/finish-large
Switching to directory /home/carll/GDB/build-ada/gdb/testsuite/outputs/gdb.ada/finish-large (saved CWD: /home/carll/GDB/build-ada/gdb/testsuite).
Executing on host: gnatmake p.adb -largs -margs -cargs -fvar-tracking -margs -f -I/home/carll/GDB/build-ada/gdb/testsuite/../../../binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large -g -largs -lm -margs -o /home/carll/GDB/build-ada/gdb/testsuite/outputs/gdb.ada/finish-large/p (timeout = 300)
builtin_spawn -ignore SIGHUP gnatmake p.adb -largs -margs -cargs -fvar-tracking -margs -f -I/home/carll/GDB/build-ada/gdb/testsuite/../../../binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large -g -largs -lm -margs -o /home/carll/GDB/build-ada/gdb/testsuite/outputs/gdb.ada/finish-large/p
gcc -c -I./ -fvar-tracking -I/home/carll/GDB/build-ada/gdb/testsuite/../../../binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large -g -I- /home/carll/GDB/binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large/p.adb
gcc -c -I./ -fvar-tracking -I/home/carll/GDB/build-ada/gdb/testsuite/../../../binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large -g -I- /home/carll/GDB/binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large/pck.adb
gnatbind -I/home/carll/GDB/build-ada/gdb/testsuite/../../../binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large -x p.ali
gnatlink p.ali -g -lm -o /home/carll/GDB/build-ada/gdb/testsuite/outputs/gdb.ada/finish-large/p
Switching back to /home/carll/GDB/build-ada/gdb/testsuite.
compilation failed: gcc -c -I./ -fvar-tracking -I/home/carll/GDB/build-ada/gdb/testsuite/../../../binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large -g -I- /home/carll/GDB/binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large/p.adb
gcc -c -I./ -fvar-tracking -I/home/carll/GDB/build-ada/gdb/testsuite/../../../binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large -g -I- /home/carll/GDB/binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large/pck.adb
gnatbind -I/home/carll/GDB/build-ada/gdb/testsuite/../../../binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large -x p.ali
gnatlink p.ali -g -lm -o /home/carll/GDB/build-ada/gdb/testsuite/outputs/gdb.ada/finish-large/p

FAIL: gdb.ada/finish-large.exp: compilation p.adb
testcase /home/carll/GDB/build-ada/gdb/testsuite/../../../binutils-gdb-ada/gdb/testsuite/gdb.ada/finish-large.exp completed in 0 seconds

=== gdb Summary ===

# of unexpected failures 1
Executing on host: /home/carll/bin/gdb -nw -nx -q -iex "set height 0" -iex "set width 0" --version (timeout = 300)
builtin_spawn -ignore SIGHUP /home/carll/bin/gdb -nw -nx -q -iex set height 0 -iex set width 0 --version
GNU gdb (GDB) 15.0.50.20231114-git
Copyright (C) 2023 Free Software Foundation, Inc.
License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>
This is free software: you are free to change and redistribute it.
There is NO WARRANTY, to the extent permitted by law.
/home/carll/bin/gdb version 15.0.50.20231114-git -nw -nx -q -iex "set height 0" -iex "set width 0"

runtest completed at Tue Nov 14 17:17:50 2023