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:
parent
e0e4a4db6d
commit
7dfe4a0653
7 changed files with 27 additions and 41 deletions
24
Examples/test-suite/guile/guile_ext_test_external.cxx
Normal file
24
Examples/test-suite/guile/guile_ext_test_external.cxx
Normal file
|
|
@ -0,0 +1,24 @@
|
|||
#include <guile_ext_test_wrap_hdr.h>
|
||||
#include <imports_a.h>
|
||||
|
||||
SCM test_create()
|
||||
{
|
||||
#define FUNC_NAME "test-create"
|
||||
SCM result;
|
||||
A *newobj;
|
||||
swig_type_info *type;
|
||||
|
||||
newobj = new A();
|
||||
type = SWIG_TypeQuery("A *");
|
||||
result = SWIG_NewPointerObj(newobj, type, 1);
|
||||
|
||||
return result;
|
||||
#undef FUNC_NAME
|
||||
}
|
||||
|
||||
SCM test_is_pointer(SCM val)
|
||||
{
|
||||
#define FUNC_NAME "test-is-pointer"
|
||||
return SCM_BOOL(SWIG_IsPointer(val));
|
||||
#undef FUNC_NAME
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue