Make guile test suite default to scm api

In other words guilescm becomes guile.
Deprecated gh api tests are moved to guilegh.
This commit is contained in:
Geert Janssens 2013-03-07 14:39:38 +01:00
parent e0e4a4db6d
commit 7dfe4a0653
7 changed files with 27 additions and 41 deletions

View File

@ -2,14 +2,16 @@
# Makefile for guile test-suite # Makefile for guile test-suite
####################################################################### #######################################################################
EXTRA_TEST_CASES += guile_ext_test.externaltest
LANGUAGE = guile LANGUAGE = guile
VARIANT = _gh VARIANT =
SCRIPTSUFFIX = _runme.scm SCRIPTSUFFIX = _runme.scm
srcdir = @srcdir@ srcdir = @srcdir@
top_srcdir = @top_srcdir@ top_srcdir = @top_srcdir@
top_builddir = @top_builddir@ top_builddir = @top_builddir@
GUILE = @GUILE@ GUILE = @GUILE@
GUILE_RUNTIME=-runtime GUILE_RUNTIME=
C_TEST_CASES = long_long \ C_TEST_CASES = long_long \
list_vector \ list_vector \
@ -20,7 +22,7 @@ C_TEST_CASES = long_long \
include $(srcdir)/../common.mk include $(srcdir)/../common.mk
# Overridden variables here # Overridden variables here
# none! INCLUDES += -I$(top_srcdir)/$(EXAMPLES)/$(TEST_SUITE)/guile
# Custom tests - tests with additional commandline options # Custom tests - tests with additional commandline options
%.multicpptest: SWIGOPT += $(GUILE_RUNTIME) %.multicpptest: SWIGOPT += $(GUILE_RUNTIME)
@ -41,6 +43,11 @@ include $(srcdir)/../common.mk
+$(swig_and_compile_multi_cpp) +$(swig_and_compile_multi_cpp)
$(run_testcase) $(run_testcase)
%.externaltest:
$(setup)
+$(swig_and_compile_external)
$(run_testcase)
# Runs the testcase. A testcase is only run if # Runs the testcase. A testcase is only run if
# a file is found which has _runme.scm appended after the testcase name. # a file is found which has _runme.scm appended after the testcase name.
run_testcase = \ run_testcase = \

View File

@ -1,4 +1,4 @@
#include <guilescm_ext_test_wrap_hdr.h> #include <guile_ext_test_wrap_hdr.h>
#include <imports_a.h> #include <imports_a.h>
SCM test_create() SCM test_create()

View File

@ -1,4 +1,4 @@
(dynamic-call "scm_init_guilescm_ext_test_module" (dynamic-link "./libguilescm_ext_test.so")) (dynamic-call "scm_init_guile_ext_test_module" (dynamic-link "./libguile_ext_test.so"))
; This is a test for SF Bug 1573892 ; This is a test for SF Bug 1573892
; If IsPointer is called before TypeQuery, the test-is-pointer will fail ; If IsPointer is called before TypeQuery, the test-is-pointer will fail

View File

@ -1,4 +1,4 @@
%module guilescm_ext_test %module guile_ext_test
/* just use the imports_a.h header... for this test we only need a class */ /* just use the imports_a.h header... for this test we only need a class */
%{ %{

View File

@ -2,16 +2,13 @@
# Makefile for guile test-suite (with SCM API) # Makefile for guile test-suite (with SCM API)
####################################################################### #######################################################################
EXTRA_TEST_CASES += guilescm_ext_test.externaltest
include ../guile/Makefile include ../guile/Makefile
# Overridden variables here # Overridden variables here
INCLUDES += -I$(top_srcdir)/$(EXAMPLES)/$(TEST_SUITE)/guilescm VARIANT = _gh
VARIANT =
# Refer to the guile directory for the run scripts # Refer to the guile directory for the run scripts
SCRIPTPREFIX = ../guile/ SCRIPTPREFIX = ../guile/
GUILE_RUNTIME= GUILE_RUNTIME=-runtime
# Custom tests - tests with additional commandline options # Custom tests - tests with additional commandline options
# none! # none!
@ -25,25 +22,7 @@ run_testcase = \
setup = \ setup = \
if [ -f $(srcdir)/$(SCRIPTPREFIX)$*$(SCRIPTSUFFIX) ]; then \ if [ -f $(srcdir)/$(SCRIPTPREFIX)$*$(SCRIPTSUFFIX) ]; then \
echo "$(ACTION)ing testcase $* (with run test) under $(LANGUAGE) (with SCM API)" ; \ echo "$(ACTION)ing testcase $* (with run test) under $(LANGUAGE) (with GH API)" ; \
else \ else \
echo "$(ACTION)ing testcase $* under $(LANGUAGE) (with SCM API)" ; \ echo "$(ACTION)ing testcase $* under $(LANGUAGE) (with GH API)" ; \
fi
%.externaltest:
$(local_setup)
+$(swig_and_compile_external)
$(local_run_testcase)
# Same as setup and run_testcase, but without the SCRIPTPREFIX (so the runme comes from the guilescm directory)
local_setup = \
if [ -f $(srcdir)/$*$(SCRIPTSUFFIX) ]; then \
echo "$(ACTION)ing testcase $* (with run test) under $(LANGUAGE) (with SCM API)" ; \
else \
echo "$(ACTION)ing testcase $* under $(LANGUAGE) (with SCM API)" ; \
fi
local_run_testcase = \
if [ -f $(srcdir)/$*$(SCRIPTSUFFIX) ]; then \
env LD_LIBRARY_PATH=.:$$LD_LIBRARY_PATH $(RUNTOOL) $(GUILE) -l $(srcdir)/$*$(SCRIPTSUFFIX); \
fi fi

View File

@ -59,7 +59,7 @@ skip-tcl = test -n "@SKIP_TCL@"
skip-perl5 = test -n "@SKIP_PERL5@" skip-perl5 = test -n "@SKIP_PERL5@"
skip-python = test -n "@SKIP_PYTHON@" skip-python = test -n "@SKIP_PYTHON@"
skip-java = test -n "@SKIP_JAVA@" skip-java = test -n "@SKIP_JAVA@"
skip-guilescm = test -n "@SKIP_GUILESCM@" skip-guilegh = test -n "@SKIP_GUILEGH@"
skip-guile = test -n "@SKIP_GUILE@" skip-guile = test -n "@SKIP_GUILE@"
skip-mzscheme = test -n "@SKIP_MZSCHEME@" skip-mzscheme = test -n "@SKIP_MZSCHEME@"
skip-ruby = test -n "@SKIP_RUBY@" skip-ruby = test -n "@SKIP_RUBY@"
@ -247,7 +247,7 @@ check-test-suite: \
check-perl5-test-suite \ check-perl5-test-suite \
check-python-test-suite \ check-python-test-suite \
check-java-test-suite \ check-java-test-suite \
check-guilescm-test-suite \ check-guilegh-test-suite \
check-guile-test-suite \ check-guile-test-suite \
check-mzscheme-test-suite \ check-mzscheme-test-suite \
check-ruby-test-suite \ check-ruby-test-suite \
@ -300,7 +300,7 @@ all-test-suite: \
all-perl5-test-suite \ all-perl5-test-suite \
all-python-test-suite \ all-python-test-suite \
all-java-test-suite \ all-java-test-suite \
all-guilescm-test-suite \ all-guilegh-test-suite \
all-guile-test-suite \ all-guile-test-suite \
all-mzscheme-test-suite \ all-mzscheme-test-suite \
all-ruby-test-suite \ all-ruby-test-suite \
@ -329,7 +329,7 @@ broken-test-suite: \
broken-perl5-test-suite \ broken-perl5-test-suite \
broken-python-test-suite \ broken-python-test-suite \
broken-java-test-suite \ broken-java-test-suite \
broken-guilescm-test-suite \ broken-guilegh-test-suite \
broken-guile-test-suite \ broken-guile-test-suite \
broken-mzscheme-test-suite \ broken-mzscheme-test-suite \
broken-ruby-test-suite \ broken-ruby-test-suite \

View File

@ -2268,16 +2268,16 @@ AC_SUBST(SKIP_JAVA)
SKIP_GUILE= SKIP_GUILE=
if test -z "$GUILEINCLUDE" || test -z "$GUILELIB" || test -z "$GUILE_GH_INTERFACE"; then if test -z "$GUILEINCLUDE" || test -z "$GUILELIB" || test -z "$GUILE_SCM_INTERFACE"; then
SKIP_GUILE="1" SKIP_GUILE="1"
fi fi
AC_SUBST(SKIP_GUILE) AC_SUBST(SKIP_GUILE)
SKIP_GUILESCM= SKIP_GUILEGH=
if test -z "$GUILEINCLUDE" || test -z "$GUILELIB" || test -z "$GUILE_SCM_INTERFACE"; then if test -z "$GUILEINCLUDE" || test -z "$GUILELIB" || test -z "$GUILE_GH_INTERFACE"; then
SKIP_GUILESCM="1" SKIP_GUILEGH="1"
fi fi
AC_SUBST(SKIP_GUILESCM) AC_SUBST(SKIP_GUILEGH)
SKIP_MZSCHEME= SKIP_MZSCHEME=
@ -2454,7 +2454,7 @@ AC_CONFIG_FILES([ \
Examples/test-suite/csharp/Makefile \ Examples/test-suite/csharp/Makefile \
Examples/test-suite/d/Makefile \ Examples/test-suite/d/Makefile \
Examples/test-suite/guile/Makefile \ Examples/test-suite/guile/Makefile \
Examples/test-suite/guilescm/Makefile \ Examples/test-suite/guilegh/Makefile \
Examples/test-suite/java/Makefile \ Examples/test-suite/java/Makefile \
Examples/test-suite/mzscheme/Makefile \ Examples/test-suite/mzscheme/Makefile \
Examples/test-suite/ocaml/Makefile \ Examples/test-suite/ocaml/Makefile \