mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-17 09:10:22 +02:00
Code Activity

* Removed unused member "documentation" from struct scm_subr_entry.

Browse source 
* Eliminate use of scm_intern0/scm_sysintern0 in procs.c.
This commit is contained in:
Dirk Herrmann 2000-12-22 16:46:17 +00:00
parent 2e9c835db9
commit c9c01b1125
5 changed files with 35 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

9
libguile/procs.h
View file

@ -63,7 +63,6 @@ typedef struct
* *generic == 0 until first method
*/
SCM properties; /* procedure properties */
SCM documentation;
} scm_subr_entry;
#define SCM_SUBRNUM(subr) (SCM_CELL_WORD_0 (subr) >> 8)
@ -88,7 +87,6 @@ typedef struct
#define SCM_SUBR_GENERIC(x) (SCM_SUBR_ENTRY (x).generic)
#define SCM_SUBR_PROPS(x) (SCM_SUBR_ENTRY (x).properties)
#define SCM_SUBR_DOC(x) (SCM_SUBR_ENTRY (x).documentation)
/* Closures
*/
@ -190,6 +188,13 @@ extern SCM scm_make_cclo (SCM proc, SCM len);
#endif /*GUILE_DEBUG*/
#if (SCM_DEBUG_DEPRECATED == 0)
#define SCM_SUBR_DOC(x) SCM_BOOL_F
#endif /* SCM_DEBUG_DEPRECATED == 0 */
#endif /* PROCSH */
/*