diff options
author | Rob Savoye <rob@welcomehome.org> | 2004-04-21 16:50:23 +0000 |
---|---|---|
committer | Rob Savoye <rob@welcomehome.org> | 2004-04-21 16:50:23 +0000 |
commit | 81264c6f851528ea441ca75985114e9980a4ffc8 (patch) | |
tree | ad56a255e1c1f801417a3d21e2f10d03795dfbd4 /lib/libgloss.exp | |
parent | 1ff80f6db281d77d8ceb59477142d6294e013ff9 (diff) | |
download | dejagnu-81264c6f851528ea441ca75985114e9980a4ffc8.zip dejagnu-81264c6f851528ea441ca75985114e9980a4ffc8.tar.gz dejagnu-81264c6f851528ea441ca75985114e9980a4ffc8.tar.bz2 |
2004-03-29 Joel Brobecker <brobecker@gnat.com>
* lib/libgloss.exp (find_gnatmake): New procedure.
* lib/target.exp (default_target_compile): Add support for Ada.
Diffstat (limited to 'lib/libgloss.exp')
-rw-r--r-- | lib/libgloss.exp | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/lib/libgloss.exp b/lib/libgloss.exp index ebdf299..7c6d13f 100644 --- a/lib/libgloss.exp +++ b/lib/libgloss.exp @@ -695,6 +695,26 @@ proc find_g77 {} { return $CC } +proc find_gnatmake {} { + global tool_root_dir + + set root "$tool_root_dir/gcc" + set GM "" + + if ![is_remote host] { + set file [lookfor_file $root gnatmake] + if { $file != "" } { + set GM "$file -I$root/ada/rts --GCC=$root/xgcc --GNATBIND=$root/gnatbind --GNATLINK=$root/gnatlink -cargs -B$root -largs --GCC=$root/xgcc -margs"; + } + } + + if {$GM == ""} { + set GM [transform gnatmake] + } + + return $GM +} + proc find_nm {} { global tool_root_dir |