jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(GUILE::close): Fix bug: Use "swig" for `module_name' if unset.

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@584 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Thien-Thi Nguyen 2000-07-20 19:49:28 +00:00
commit 6e4e6f3598
1 changed files with 10 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

15
Source/Modules1.1/guile.cxx
View file

@ -20,7 +20,7 @@ static char cvsroot[] = "$Header$";
* *
* guile.cxx * guile.cxx
* *
* Definitions for adding functions to Guile 3.0 * Definitions for adding functions to Guile
***********************************************************************/ ***********************************************************************/
#include "mod11.h" #include "mod11.h"
@ -328,11 +328,14 @@ GUILE::close (void)
Printf (f_init, "}\n\n"); Printf (f_init, "}\n\n");
char module_name[256]; char module_name[256];
if (package) if (!module)
sprintf(module_name,"%s/%s", package,module); sprintf(module_name, "swig");
else else {
strcpy(module_name,module); if (package)
sprintf(module_name,"%s/%s", package,module);
else
strcpy(module_name,module);
}
emit_linkage (module_name); emit_linkage (module_name);
} }