8d704fbc0f
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@392 626c5289-ae23-0410-ae9c-e8d60b6d4f22
55 lines
1.7 KiB
C++
55 lines
1.7 KiB
C++
/*******************************************************************************
|
|
* Simplified Wrapper and Interface Generator (SWIG)
|
|
*
|
|
* Author : David Beazley
|
|
*
|
|
* Department of Computer Science
|
|
* University of Chicago
|
|
* 1100 E 58th Street
|
|
* Chicago, IL 60637
|
|
* beazley@cs.uchicago.edu
|
|
*
|
|
* Please read the file LICENSE for the copyright and terms by which SWIG
|
|
* can be used and distributed.
|
|
*******************************************************************************/
|
|
|
|
/**************************************************************************
|
|
* $Header$
|
|
*
|
|
* class MZSCHEME
|
|
*
|
|
* Mzscheme implementation
|
|
* (Caution : This is *somewhat* experimental)
|
|
*
|
|
**************************************************************************/
|
|
|
|
class MZSCHEME : public Language
|
|
{
|
|
private:
|
|
char *mzscheme_path;
|
|
char *prefix;
|
|
char *module;
|
|
char *package;
|
|
int linkage;
|
|
void get_pointer(char *iname, int parm, DataType *t, WrapperFunction &f);
|
|
void usage_var(char *, DataType *, String &usage);
|
|
void usage_func(char *, DataType *, ParmList *, String &usage);
|
|
void usage_returns(char *, DataType *, ParmList *, String &usage);
|
|
void usage_const(char *, DataType *, char *, String &usage);
|
|
|
|
String init_func_def;
|
|
|
|
public :
|
|
MZSCHEME ();
|
|
void parse_args (int, char *argv[]);
|
|
void parse ();
|
|
void create_function (char *, char *, DataType *, ParmList *);
|
|
void link_variable (char *, char *, DataType *);
|
|
void declare_const (char *, char *, DataType *, char *);
|
|
void initialize ();
|
|
void headers (void);
|
|
void close (void);
|
|
void set_module (char *, char **);
|
|
void set_init (char *);
|
|
void create_command (char *, char *) { };
|
|
};
|