{Incorporate support contributed by Clark McGrew.}

(prefix, package): New data members.
(get_pointer): Take additional arg `WrapperFunction&'.
(usage_var, usage_func, usage_const): Last arg now `String&'.
(usage_returns): New func.

(GUILE): Move definition into guile.cxx.
(parse_args, parse, create_function, link_variable,
declare_const, initialize, headers, close, set_module,
set_init, create_command): Don't declare these virtual.


git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@256 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Thien-Thi Nguyen 2000-02-24 18:24:07 +00:00
commit 71fac9147a

View file

@ -1,9 +1,9 @@
/******************************************************************************* /*******************************************************************************
* Simplified Wrapper and Interface Generator (SWIG) * Simplified Wrapper and Interface Generator (SWIG)
* *
* Author : David Beazley * Author : David Beazley
* *
* Department of Computer Science * Department of Computer Science
* University of Chicago * University of Chicago
* 1100 E 58th Street * 1100 E 58th Street
* Chicago, IL 60637 * Chicago, IL 60637
@ -21,37 +21,32 @@
* Guile implementation * Guile implementation
* (Caution : This is *somewhat* experimental) * (Caution : This is *somewhat* experimental)
* *
* Seeking : highly motivated individual with plenty of spare time and
* a love of Guile. Must be willing to modify this code and
* make it better.
**************************************************************************/ **************************************************************************/
class GUILE : public Language { class GUILE : public Language
{
private: private:
char *guile_path; char *guile_path;
char *prefix;
char *module; char *module;
void get_pointer(char *iname, int parm, DataType *t); char *package;
void usage_var(char *, DataType *, char **); void get_pointer(char *iname, int parm, DataType *t, WrapperFunction &f);
void usage_func(char *, DataType *, ParmList *, char **); void usage_var(char *, DataType *, String &usage);
void usage_const(char *, DataType *, char *, char **); void usage_func(char *, DataType *, ParmList *, String &usage);
void usage_returns(char *, DataType *, ParmList *, String &usage);
void usage_const(char *, DataType *, char *, String &usage);
public : public :
GUILE() { GUILE ();
module = 0; void parse_args (int, char *argv[]);
guile_path = "guile"; void parse ();
} void create_function (char *, char *, DataType *, ParmList *);
virtual void parse_args(int, char *argv[]); void link_variable (char *, char *, DataType *);
virtual void parse(); void declare_const (char *, char *, DataType *, char *);
virtual void create_function(char *, char *, DataType *, ParmList *); void initialize ();
virtual void link_variable(char *, char *, DataType *); void headers (void);
virtual void declare_const(char *, char *, DataType *, char *); void close (void);
virtual void initialize(); void set_module (char *, char **);
virtual void headers(void); void set_init (char *);
virtual void close(void); void create_command (char *, char *) { };
virtual void set_module(char *, char **);
virtual void set_init(char *);
virtual void create_command(char *, char *) { };
}; };