mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 16:51:06 -07:00
Code Issues Projects Releases Wiki Activity

Eliminating generated classof* and setclassof* functions in favour of checked poly macros.

Browse source 
Copied from Perforce
 Change: 190938
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Richard Brooksby 2016-04-11 18:06:47 +01:00
parent 62533b8c71
commit 12d4dfda16
30 changed files with 67 additions and 117 deletions
Download patch file Download diff file Expand all files Collapse all files

17
mps/code/protocol.h
View file

@ -248,23 +248,6 @@ extern void InstFinish(Inst inst);
inst))
/* ClassOf* -- get the class of an instance */
#define CLASS_DECLARE_CLASSOF(prefix, ident, kind, super) \
struct INST_STRUCT(ident); \
extern CLASS_TYPE(kind) (prefix ## ident)(struct INST_STRUCT(ident) *inst);
CLASSES(CLASS_DECLARE_CLASSOF, ClassOf)
/* SetClassOf -- set the class of an instance */
#define CLASS_DECLARE_SETCLASSOF(prefix, ident, kind, super) \
void (prefix ## ident)(struct INST_STRUCT(ident) *inst, CLASS_TYPE(kind) class);
CLASSES(CLASS_DECLARE_SETCLASSOF, SetClassOf)
/* Method -- method call
*
* FIXME: This isn't a very nice way to do this, but there's an