jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Now only basic types are provided, and changed the name "ffitype" to "in. We now do recursive type conversion in clisp.cxx so no need to provide pointer and array types.

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@7335 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Surendra Singhi 2005-07-18 06:23:41 +00:00
commit 151913f03f
1 changed files with 20 additions and 20 deletions
Download patch file Download diff file Expand all files Collapse all files

40
SWIG/Lib/clisp/clisp.swg
View file

@ -5,24 +5,24 @@
/* Typespecs for basic types. */
%typemap(ffitype) void "NIL";
%typemap(ffitype) void * "(ffi:c-pointer NIL)";
%typemap(ffitype) char "character";
%typemap(ffitype) char * "ffi:c-string";
%typemap(ffitype) unsigned char "ffi:uchar";
%typemap(ffitype) signed char "ffi:char";
%typemap(ffitype) short "ffi:short";
%typemap(ffitype) signed short "ffi:short";
%typemap(ffitype) unsigned short "ffi:ushort";
%typemap(ffitype) int "ffi:int";
%typemap(ffitype) int * "(ffi:c-pointer ffi:int)";
%typemap(ffitype) signed int "ffi:int";
%typemap(ffitype) unsigned int "ffi:uint";
%typemap(ffitype) long "ffi:long";
%typemap(ffitype) signed long "ffi:long";
%typemap(ffitype) unsigned long "ffi:ulong";
%typemap(ffitype) float "SINGLE-FLOAT";
%typemap(ffitype) float * "(ffi:c-pointer SINGLE-FLOAT)";
%typemap(ffitype) double "DOUBLE_FLOAT";
%typemap(ffitype) double * "(ffi:c-pointer DOUBLE-FLOAT)";
%typemap(in) void "NIL";
%typemap(in) char "character";
%typemap(in) char * "ffi:c-string";
%typemap(in) unsigned char "ffi:uchar";
%typemap(in) signed char "ffi:char";
%typemap(in) short "ffi:short";
%typemap(in) signed short "ffi:short";
%typemap(in) unsigned short "ffi:ushort";
%typemap(in) int "ffi:int";
%typemap(in) signed int "ffi:int";
%typemap(in) unsigned int "ffi:uint";
%typemap(in) long "ffi:long";
%typemap(in) signed long "ffi:long";
%typemap(in) unsigned long "ffi:ulong";
%typemap(in) float "SINGLE-FLOAT";
%typemap(in) double "DOUBLE_FLOAT";