Mercurial > hg > xemacs-beta
comparison src/specifier.c @ 50:ee648375d8d6 r19-16b91
Import from CVS: tag r19-16b91
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:56:41 +0200 |
parents | 56c54cf7c5b6 |
children | 131b0175ea99 |
comparison
equal
deleted
inserted
replaced
49:b46643e427ac | 50:ee648375d8d6 |
---|---|
72 | 72 |
73 /* #### The purpose of this is to check for inheritance loops | 73 /* #### The purpose of this is to check for inheritance loops |
74 in specifiers that can inherit from other specifiers, but it's | 74 in specifiers that can inherit from other specifiers, but it's |
75 not yet implemented. | 75 not yet implemented. |
76 | 76 |
77 #### Look into this for 19.14. */ | 77 #### Look into this some day. */ |
78 lisp_dynarr current_specifiers; | 78 lisp_dynarr current_specifiers; |
79 | 79 |
80 static void recompute_cached_specifier_everywhere (Lisp_Object specifier); | 80 static void recompute_cached_specifier_everywhere (Lisp_Object specifier); |
81 | 81 |
82 | 82 |
2769 is supposed to require only that the specifier type is passed, | 2769 is supposed to require only that the specifier type is passed, |
2770 while with this approach the actual specifier is needed.) | 2770 while with this approach the actual specifier is needed.) |
2771 | 2771 |
2772 What really needs to be done is to write a function | 2772 What really needs to be done is to write a function |
2773 `make-specifier-type' that creates new specifier types. | 2773 `make-specifier-type' that creates new specifier types. |
2774 #### I'll look into this for 19.14. | |
2775 */ | 2774 */ |
2776 | 2775 |
2777 "A generic specifier is a generalized kind of specifier with user-defined\n" | 2776 "A generic specifier is a generalized kind of specifier with user-defined\n" |
2778 "semantics. The instantiator can be any kind of Lisp object, and the\n" | 2777 "semantics. The instantiator can be any kind of Lisp object, and the\n" |
2779 "instance computed from it is likewise any kind of Lisp object. The\n" | 2778 "instance computed from it is likewise any kind of Lisp object. The\n" |