From 42edc28ca19db6258efa96f0e4d919c9f62b2aae Mon Sep 17 00:00:00 2001 From: Mikel Bancroft Date: Fri, 10 Mar 2006 23:31:46 +0000 Subject: [PATCH] 03/10/2006: mutandiz [allegrocl] Fix bug in the generation of lisp wrappers for C interfaces. git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@9000 626c5289-ae23-0410-ae9c-e8d60b6d4f22 --- CHANGES.current | 5 +++++ Source/Modules/allegrocl.cxx | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/CHANGES.current b/CHANGES.current index 685f375af..645d45c81 100644 --- a/CHANGES.current +++ b/CHANGES.current @@ -1,6 +1,11 @@ Version 1.3.29 (March 8, 2006) ============================== +03/10/2006: mutandiz + [allegrocl] + Fix bug in C wrapper generation introduced by last allegrocl + commit. + 03/10/2006: wsfulton Fix #1444949 - configure does not honor --program-prefix. Removed non-standard configure option --with-release-suffix. Fix the autoconf standard diff --git a/Source/Modules/allegrocl.cxx b/Source/Modules/allegrocl.cxx index 1dd0e4a07..560f0040a 100644 --- a/Source/Modules/allegrocl.cxx +++ b/Source/Modules/allegrocl.cxx @@ -2273,7 +2273,7 @@ int ALLEGROCL :: emit_defun(Node *n, File *f_cl) { else { Printf(f_cl, "(swig-defun (\"%s\" \"%s\")\n", funcname, - Generate_Wrapper ? mangled_name : ""); + Generate_Wrapper ? mangled_name : funcname); } //////////////////////////////////////