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

Revert guile_gh.swg and guile_gh_run.swg to not use new runtime system.

Browse source 
Added global variable to hold status of -runtime,-c,-noruntime flag for use
  in guile gh module mode.


git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@6630 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
John Lenz 2004-11-02 22:06:53 +00:00
commit c65f985bc6
6 changed files with 111 additions and 89 deletions
Download patch file Download diff file Expand all files Collapse all files

7
Source/Modules/guile.cxx
View file

@ -356,6 +356,13 @@ public:
Swig_banner (f_runtime);
Printf (f_runtime, "/* Implementation : GUILE */\n\n");
if (!use_scm_interface) {
if (SwigRuntime == 1)
Printf(f_runtime, "#define SWIG_GLOBAL\n");
if (SwigRuntime == 2)
Printf(f_runtime, "#define SWIG_NOINCLUDE\n");
}
/* Write out directives and declarations */

10
Source/Modules/main.cxx
View file

@ -38,6 +38,7 @@ char cvsroot_main_cxx[] = "$Header$";
int NoExtern = 0;
int NoExcept = 0;
char *SwigLib;
int SwigRuntime = 0; // 0 = no option, 1 = -c or -runtime, 2 = -noruntime
extern "C" {
@ -313,11 +314,14 @@ void SWIG_getoptions(int argc, char *argv[])
Wrapper_compact_print_mode_set(1);
Wrapper_virtual_elimination_mode_set(1);
Swig_mark_arg(i);
} else if ((strcmp(argv[i],"-noruntime") == 0) ||
(strcmp(argv[i],"-c") == 0) ||
(strcmp(argv[i], "-runtime") == 0)) {
} else if (strcmp(argv[i], "-runtime") == 0) {
Swig_mark_arg(i);
Swig_warning(WARN_DEPRECATED_OPTC, "SWIG",1, "-c, -runtime, -noruntime command line options are deprecated.\n");
SwigRuntime = 1;
} else if ((strcmp(argv[i],"-c") == 0) || (strcmp(argv[i],"-noruntime") == 0)) {
Swig_mark_arg(i);
Swig_warning(WARN_DEPRECATED_OPTC, "SWIG",1, "-c, -runtime, -noruntime command line options are deprecated.\n");
SwigRuntime = 2;
} else if ((strcmp(argv[i],"-make_default") == 0) || (strcmp(argv[i],"-makedefault") == 0)) {
GenerateDefault = 1;
Swig_mark_arg(i);

1
Source/Modules/swigmod.h
View file

@ -46,6 +46,7 @@ extern int ImportMode;
extern int NoExcept; // -no_except option
extern int Abstract; // abstract base class
extern int SmartPointer; // smart pointer methods being emitted
extern int SwigRuntime;
/* Overload "argc" and "argv" */
extern String *argv_template_string;