diff options
| author | Joel Brobecker <brobecker@gnat.com> | 2005-02-03 03:58:53 +0000 |
|---|---|---|
| committer | Joel Brobecker <brobecker@gnat.com> | 2005-02-03 03:58:53 +0000 |
| commit | 464dd14d58f648ec577fda6004708c385e3084a3 (patch) | |
| tree | e79cc0d5038017851985265ae7b374a6129c6933 /gdb/testsuite/lib | |
| parent | 11f25ea6caba4354a6c58653e92e125313d5a659 (diff) | |
| download | gdb-464dd14d58f648ec577fda6004708c385e3084a3.zip gdb-464dd14d58f648ec577fda6004708c385e3084a3.tar.gz gdb-464dd14d58f648ec577fda6004708c385e3084a3.tar.bz2 | |
* gdb.ada/gnat_ada.gpr: New file.
* gdb.ada/gnat_ada.gin: Delete, no longer used.
* lib/ada.exp (gdb_compile_ada): Minor adaptation to new project file.
* configure.ac: No longer generate gnat_ada.gpr.
* configure: Regenerate.
* gdb.ada/Makefile.in: Minor adaptations due to new project file.
* gdb.ada/null_record/null_record.adb: Moved here from gdb.ada.
* gdb.ada/null_record/bar.ads: Likewise.
* gdb.ada/null_record/bar.adb: Likewise.
* gdb.ada/fixed_points/fixed_points.adb: Likewise.
* gdb.ada/null_record.exp (testdir): New variable.
(testfile): executable is now in testdir subdirectory.
(srcfile): Use full path to the main compilation unit.
* gdb.ada/fixed_points.exp: Same changes as above.
Diffstat (limited to 'gdb/testsuite/lib')
| -rw-r--r-- | gdb/testsuite/lib/ada.exp | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/gdb/testsuite/lib/ada.exp b/gdb/testsuite/lib/ada.exp index 3bd8e29..647114a 100644 --- a/gdb/testsuite/lib/ada.exp +++ b/gdb/testsuite/lib/ada.exp @@ -409,12 +409,16 @@ if {[info procs find_gnatmake] == ""} { proc gdb_compile_ada {source dest type options} { + set srcdir [file dirname $source] + set gprdir [file dirname $srcdir] set objdir [file dirname $dest] append options " ada" - append options " additional_flags=-P$objdir/gnat_ada" + append options " additional_flags=-P$gprdir/gnat_ada" + append options " additional_flags=-XSRC=[file tail $srcdir]" + append options " additional_flags=-XOBJ=$objdir" - set result [target_compile $source $dest $type $options] + set result [target_compile [file tail $source] $dest $type $options] # The Ada build always produces some output, even when the build # succeeds. Thus, we can not use the output the same way we do in |