case mode fixes for allegrocl module
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@6070 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
53ed088b56
commit
440a4592e3
3 changed files with 15 additions and 6 deletions
|
|
@ -360,10 +360,9 @@ int ALLEGROCL :: classDeclaration(Node *n) {
|
|||
Printf(stderr, " (name: %s)\n", name);
|
||||
SWIG_exit(EXIT_FAILURE);
|
||||
}
|
||||
|
||||
|
||||
Printf(f_cl,
|
||||
"(ff:def-foreign-type #.(%s \"%s\" :type :type)\n (:struct\n",
|
||||
identifier_converter,
|
||||
"(swig-def-foreign-type \"%s\"\n (:struct\n",
|
||||
name);
|
||||
|
||||
for (c=firstChild(n); c; c=nextSibling(c)) {
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue