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"