mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 20:00:19 +02:00
Code Activity

* procs.c: Increased `scm_subr_table_room' to 800 because Guile now

Browse source 
has 779 primitives on startup.
This commit is contained in:
Martin Grabmüller 2001-05-09 21:50:43 +00:00
parent 284ab60172
commit 7c582ec9b5
2 changed files with 9 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
libguile/ChangeLog
View file

@ -1,3 +1,8 @@
2001-05-09 Martin Grabmueller <mgrabmue@cs.tu-berlin.de>
* procs.c: Increased `scm_subr_table_room' to 800 because Guile now
has 779 primitives on startup.
2001-05-09 Marius Vollmer <mvo@zagadka.ping.de> 2001-05-09 Marius Vollmer <mvo@zagadka.ping.de>
* eval.c (scm_i_eval): Copy expression before passing it to * eval.c (scm_i_eval): Copy expression before passing it to

5
libguile/procs.c
View file

@ -63,8 +63,11 @@ scm_subr_entry *scm_subr_table;
/* libguile contained approx. 700 primitive procedures on 24 Aug 1999. */ /* libguile contained approx. 700 primitive procedures on 24 Aug 1999. */
/* Increased to 800 on 2001-05-07 -- Guile now has 779 primitives on
startup, 786 with guile-readline. 'martin */
int scm_subr_table_size = 0; int scm_subr_table_size = 0;
int scm_subr_table_room = 750; int scm_subr_table_room = 800;
SCM SCM
scm_make_subr_opt (const char *name, int type, SCM (*fcn) (), int set) scm_make_subr_opt (const char *name, int type, SCM (*fcn) (), int set)