aboutsummaryrefslogtreecommitdiff
path: root/lib/libgloss.exp
diff options
context:
space:
mode:
authorRob Savoye <rob@welcomehome.org>2004-04-21 16:50:23 +0000
committerRob Savoye <rob@welcomehome.org>2004-04-21 16:50:23 +0000
commit81264c6f851528ea441ca75985114e9980a4ffc8 (patch)
treead56a255e1c1f801417a3d21e2f10d03795dfbd4 /lib/libgloss.exp
parent1ff80f6db281d77d8ceb59477142d6294e013ff9 (diff)
downloaddejagnu-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.exp20
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