diff options
| author | Ben Elliston <bje@gnu.org> | 2003-08-19 00:11:43 +0000 |
|---|---|---|
| committer | Ben Elliston <bje@gnu.org> | 2003-08-19 00:11:43 +0000 |
| commit | 22b23d35df2026d61cd1fdbd322e13f03d5e09da (patch) | |
| tree | cadca88120f9f904981c2670c25daa2a6d6ec7a5 /lib/libgloss.exp | |
| parent | d8222ca8b95f85467601faf692ec5e391e407e1d (diff) | |
| download | dejagnu-22b23d35df2026d61cd1fdbd322e13f03d5e09da.zip dejagnu-22b23d35df2026d61cd1fdbd322e13f03d5e09da.tar.gz dejagnu-22b23d35df2026d61cd1fdbd322e13f03d5e09da.tar.bz2 | |
Re-indent with Emacs' tcl-mode.
Diffstat (limited to 'lib/libgloss.exp')
| -rw-r--r-- | lib/libgloss.exp | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/libgloss.exp b/lib/libgloss.exp index 13d30d0..a8edc52 100644 --- a/lib/libgloss.exp +++ b/lib/libgloss.exp @@ -449,10 +449,10 @@ proc get_multilibs { args } { # extract the options and their directory names as know by gcc foreach i "[exec $compiler --print-multi-lib]" { if {$extra != ""} { - # string trimright would do the wrong thing if we included - # the leading @@ in $extra - set i [string trimright $i $extra] - set i [string trimright $i "@@"] + # string trimright would do the wrong thing if we included + # the leading @@ in $extra + set i [string trimright $i $extra] + set i [string trimright $i "@@"] } set opts "" set dir "" @@ -847,7 +847,7 @@ proc build_wrapper { gluefile } { lappend flags "additional_flags=[target_info wrap_compile_flags]" } if { [target_compile ${libdir}/testglue.c ${gluefile} object $flags] == "" } { - set gluefile [remote_download host ${gluefile} ${tool}_tg.o] + set gluefile [remote_download host ${gluefile} ${tool}_tg.o] return [list $gluefile $result] } else { return "" |