From 6e9d950a9126f8eaef47394a82cde0a09b952bbc Mon Sep 17 00:00:00 2001
From: Thomas Fitzsimmons <fitzsim@redhat.com>
Date: Wed, 1 May 2002 17:06:25 +0000
Subject: [PATCH] 	* Add flags.exp.

---
 newlib/testsuite/lib/flags.exp | 82 ++++++++++++++++++++++++++++++++++
 1 file changed, 82 insertions(+)
 create mode 100644 newlib/testsuite/lib/flags.exp

diff --git a/newlib/testsuite/lib/flags.exp b/newlib/testsuite/lib/flags.exp
new file mode 100644
index 000000000..f6bffde1f
--- /dev/null
+++ b/newlib/testsuite/lib/flags.exp
@@ -0,0 +1,82 @@
+# Copyright (C) 2002 by Red Hat, Incorporated. All rights reserved.
+#
+# Permission to use, copy, modify, and distribute this software
+# is freely granted, provided that this notice is preserved.
+#
+
+# flags.exp: overrides the dejagnu versions of libgloss_link_flags,
+# newlib_link_flags, and newlib_include_flags.
+
+# These versions of the procedures generate link and include flags
+# by searching for the needed files in the current build and source
+# directories, rather than in the build and source paths of the
+# compiler being used.
+
+proc libgloss_link_flags { args } {
+    global target_cpu
+    # These values come from the local site.exp.
+    global srcdir objdir
+    global multibuildtop
+
+    verbose "In newlib version of libgloss_link_flags...\n"
+
+    if [isnative] {
+	return ""
+    }
+
+    if [is_remote host] {
+	return ""
+    }
+
+    set target_build_path "$objdir/$multibuildtop.."
+
+    set gloss_srcdir [lookfor_file ${srcdir} libgloss/$target_cpu]
+
+    if { $gloss_srcdir == "" } {
+	return ""
+    }
+
+    if [file exists $target_build_path/libgloss/$target_cpu] {
+	verbose "libgloss path is $target_build_path/libgloss/$target_cpu" 2
+	return "-B$target_build_path/libgloss/$target_cpu/ -L$target_build_path/libgloss/$target_cpu -L$gloss_srcdir"
+    } else {
+	verbose -log "No libgloss support for this target." 2
+	return ""
+    }
+}
+
+proc newlib_link_flags { args } {
+    global tool_root_dir
+    global srcdir objdir
+
+    verbose "In newlib version of newlib_link_flags...\n"
+
+    if [is_remote host] {
+	return ""
+    }
+
+    set ld_script_path [lookfor_file ${tool_root_dir} "ld/ldscripts"];
+    if { $ld_script_path != "" } {
+	set result "-L[file dirname $ld_script_path]"
+    } else {
+	set result ""
+    }
+
+    return "$result -B$objdir -L$objdir"
+}
+
+proc newlib_include_flags { args } {
+    global srcdir objdir
+
+    verbose "In newlib version of newlib_include_flags...\n"
+
+    if [is_remote host] {
+	return ""
+    }
+
+    set newlib_dir [lookfor_file ${srcdir} newlib/libc/include/assert.h]
+    if { ${newlib_dir} != "" } {
+	set newlib_dir [file dirname ${newlib_dir}]
+    }
+    return " -I$objdir/targ-include -I${newlib_dir}"
+}