fixed closing paren

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@9689 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Surendra Singhi 2007-04-21 19:10:14 +00:00
commit 0ee9f91eb8

View file

@ -318,7 +318,7 @@ void CFFI::emit_initialize_instance(Node *n) {
Delete(argname);
}
Printf(f_clos, "(clos:defmethod initialize-instance :after ((obj %s) &key%s)\n (setf (slot-value obj 'ff-pointer) (%s%s))\n\n",
Printf(f_clos, "(clos:defmethod initialize-instance :after ((obj %s) &key%s)\n (setf (slot-value obj 'ff-pointer) (%s%s)))\n\n",
lispify_name(parent, lispy_name(Char(Getattr(parent, "sym:name"))), "'class"), args_placeholder,
lispify_name(n, Getattr(n, "sym:name"), "'function"), args_call);