git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

libffi-db.exp (load_gcc_lib): New function. 

* testsuite/lib/libffi-db.exp (load_gcc_lib): New function.
(libffi_exit): New function.
(libffi_init): Build the testglue wrapper if needed.

From-SVN: r89636
This commit is contained in:
Richard Earnshaw 2004-10-27 10:56:06 +00:00 committed by Richard Earnshaw
parent 028aa38946
commit fdc6959794
2 changed files with 23 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
libffi/ChangeLog
View File

@ -1,3 +1,9 @@
2004-10-27 Richard Earnshaw <rearnsha@arm.com>
* testsuite/lib/libffi-db.exp (load_gcc_lib): New function.
(libffi_exit): New function.
(libffi_init): Build the testglue wrapper if needed.
2004-10-25 Eric Botcazou <ebotcazou@libertysurf.fr> 2004-10-25 Eric Botcazou <ebotcazou@libertysurf.fr>
PR other/18138 PR other/18138

18
libffi/testsuite/lib/libffi-dg.exp
View File

@ -14,9 +14,14 @@
# along with this program; if not, write to the Free Software # along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
proc load_gcc_lib { filename } {
global srcdir
load_file $srcdir/../../gcc/testsuite/lib/$filename
}
load_lib dg.exp load_lib dg.exp
load_lib libgloss.exp load_lib libgloss.exp
load_gcc_lib wrapper.exp
# Define libffi callbacks for dg.exp. # Define libffi callbacks for dg.exp.
@ -71,6 +76,7 @@ proc libffi-init { args } {
global gluefile wrap_flags; global gluefile wrap_flags;
global srcdir global srcdir
global blddirffi global blddirffi
global objdir
global blddircxx global blddircxx
global TOOL_OPTIONS global TOOL_OPTIONS
global tool global tool
@ -148,6 +154,16 @@ proc libffi-init { args } {
} }
} }
} }
libffi_maybe_build_wrapper "${objdir}/testglue.o"
}
proc libffi_exit { } {
global gluefile;
if [info exists gluefile] {
file_on_build delete $gluefile;
unset gluefile;
}
} }
proc libffi_target_compile { source dest type options } { proc libffi_target_compile { source dest type options } {