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

Include mzscheme.h.

Browse source 
(usage): Add "-mzscheme" as another target language option.
(main): Recognize "-mzscheme".


git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@396 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Thien-Thi Nguyen 2000-04-06 08:34:40 +00:00
commit b0fa80612d
1 changed files with 9 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

7
Source/Modules1.1/swigmain.cxx
View file

@ -31,6 +31,7 @@ static char cvsroot[] = "$Header$";
#include "java.h" #include "java.h"
#include "python.h" #include "python.h"
#include "guile.h" #include "guile.h"
#include "mzscheme.h"
#include <ctype.h> #include <ctype.h>
@ -45,7 +46,8 @@ Target Language Options:\n\
-python - Generate Python wrappers.\n\ -python - Generate Python wrappers.\n\
-perl5 - Generate Perl5 wrappers.\n\ -perl5 - Generate Perl5 wrappers.\n\
-java - Generate Java wrappers.\n\ -java - Generate Java wrappers.\n\
-guile - Generate Guile wrappers.\n"; -guile - Generate Guile wrappers.\n\
-mzscheme - Generate Mzscheme wrappers.\n";
//----------------------------------------------------------------- //-----------------------------------------------------------------
// main() // main()
@ -82,6 +84,9 @@ int main(int argc, char **argv) {
} else if (strcmp(argv[i],"-java") == 0) { } else if (strcmp(argv[i],"-java") == 0) {
dl = new JAVA; dl = new JAVA;
Swig_mark_arg(i); Swig_mark_arg(i);
} else if (strcmp(argv[i],"-mzscheme") == 0) {
dl = new MZSCHEME;
Swig_mark_arg(i);
} else if (strcmp(argv[i],"-help") == 0) { } else if (strcmp(argv[i],"-help") == 0) {
fputs(usage,stderr); fputs(usage,stderr);
Swig_mark_arg(i); Swig_mark_arg(i);