1990-10-14 09:07:46 -03:00
|
|
|
/* Method object interface */
|
|
|
|
|
|
|
|
extern typeobject Methodtype;
|
|
|
|
|
|
|
|
#define is_methodobject(op) ((op)->ob_type == &Methodtype)
|
|
|
|
|
|
|
|
typedef object *(*method) FPROTO((object *, object *));
|
|
|
|
|
|
|
|
extern object *newmethodobject PROTO((char *, method, object *));
|
|
|
|
extern method getmethod PROTO((object *));
|
|
|
|
extern object *getself PROTO((object *));
|
1990-12-20 11:06:42 -04:00
|
|
|
|
|
|
|
struct methodlist {
|
|
|
|
char *ml_name;
|
|
|
|
method ml_meth;
|
|
|
|
};
|
|
|
|
|
|
|
|
extern object *findmethod PROTO((struct methodlist *, object *, char *));
|