Replace hardcoded type specifiers by typemap-based type specifier lookup.

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@6114 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Matthias Köppe 2004-08-23 15:28:58 +00:00
commit 23d5f2ab9a
2 changed files with 75 additions and 63 deletions

View file

@ -3,6 +3,29 @@
#define SWIG_ALLEGRO_CL
/* Typespecs for basic types. */
%typemap(ffitype) char ":char";
%typemap(lisptype) char "character";
%typemap(ffitype) unsigned char ":unsigned-char";
%typemap(lisptype) unsigned char "integer";
%typemap(ffitype) signed char ":char";
%typemap(lisptype) signed char "integer";
%typemap(ffitype) short ":short";
%typemap(ffitype) signed short ":short";
%typemap(ffitype) unsigned short ":unsigned-short";
%typemap(ffitype) int ":int";
%typemap(ffitype) signed int ":int";
%typemap(ffitype) unsigned int ":unsigned-int";
%typemap(ffitype) long ":long";
%typemap(ffitype) signed long ":long";
%typemap(ffitype) unsigned long ":unsigned-long";
%typemap(ffitype) float ":float";
%typemap(ffitype) double ":double";
%typemap(ffitype) char * "(* :char)";
%typemap(ffitype) void * "(* :void)";
%typemap(ffitype) void ":void";
%wrapper %{
;; $Id$