56904f30d0
- Minor change to chicken to make it work with version 2.5rc1 - add externaltest to chicken and guile modules git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@9451 626c5289-ae23-0410-ae9c-e8d60b6d4f22
22 lines
500 B
C++
22 lines
500 B
C++
#include <ext_test_wrap_hdr.h>
|
|
#include <imports_a.h>
|
|
|
|
void test_create(C_word,C_word,C_word) C_noret;
|
|
void test_create(C_word argc, C_word closure, C_word continuation) {
|
|
C_word resultobj;
|
|
swig_type_info *type;
|
|
A *newobj;
|
|
C_word *known_space = C_alloc(C_SIZEOF_SWIG_POINTER);
|
|
|
|
C_trace("test-create");
|
|
if (argc!=2) C_bad_argc(argc,2);
|
|
|
|
|
|
newobj = new A();
|
|
|
|
type = SWIG_TypeQuery("A *");
|
|
resultobj = SWIG_NewPointerObj(newobj, type, 1);
|
|
|
|
C_kontinue(continuation, resultobj);
|
|
}
|
|
|