Fixed the def-c-type declaration.

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@7380 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Surendra Singhi 2005-08-23 05:17:29 +00:00
commit 82e3ec30dc

View file

@ -233,7 +233,7 @@ int CLISP :: variableWrapper(Node *n) {
int CLISP :: typedefHandler(Node *n) {
if(generate_typedef_flag) {
is_function=0;
Printf(f_cl,"\n(ffi:def-c-type %s (:type %s)\n",Getattr(n,"name"),get_ffi_type(Getattr(n,"type")));
Printf(f_cl,"\n(ffi:def-c-type %s %s)\n",Getattr(n,"name"),get_ffi_type(Getattr(n,"type")));
}
return Language::typedefHandler(n);