diff options
Diffstat (limited to 'gas/testsuite/lib')
-rw-r--r-- | gas/testsuite/lib/gas-defs.exp | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/gas/testsuite/lib/gas-defs.exp b/gas/testsuite/lib/gas-defs.exp index 60f2b42..bf08fcb 100644 --- a/gas/testsuite/lib/gas-defs.exp +++ b/gas/testsuite/lib/gas-defs.exp @@ -104,6 +104,19 @@ proc gas_host_run { cmd redir } { return [list [lindex $status 0] "$to_return"] } +# gas_srcdir_path FILENAME +# +# Return a path to FILENAME relative to the directory we normally get +# sources from in the current script. For use when the actual source +# is for example in the test output directory. + +proc gas_srcdir_path { filename } { + global srcdir + global subdir + + return [get_relative_path $srcdir/$subdir $filename] +} + proc gas_run { prog as_opts redir } { global AS global ASFLAGS |