/trunk/Examples/test-suite/chicken/ext_test_external.cxx
C++ | 22 lines | 15 code | 7 blank | 0 comment | 1 complexity | f617ebc812079394c8b1f8d18d7ca7dc MD5 | raw file
Possible License(s): LGPL-2.1, Cube, GPL-3.0, 0BSD, GPL-2.0
- #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);
- }