diff options
author | Andy Wingo <wingo@pobox.com> | 2009-12-05 11:50:21 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2009-12-05 11:50:21 +0100 |
commit | 838aa0007073dbb9e8c91810299c47054ded52bd (patch) | |
tree | db92f2b58cd4ab1e65ef0426bfebb2fd53644f2c /libguile/srfi-14.c | |
parent | 562cd1b8f87dfb099c9cca5dfa4846367e6c9ca3 (diff) | |
download | guile-838aa0007073dbb9e8c91810299c47054ded52bd.tar.gz |
further boot cleanups
* libguile/srfi-14.c (define_charset):
* libguile/deprecated.c (scm_create_hook): Don't bother making the
returned objects (hooks or charsets) into permanent objects; they are
already defined, and then the caller probably stores them away too.
* libguile/init.c (scm_i_init_guile): Add a couple annotations.
Diffstat (limited to 'libguile/srfi-14.c')
-rw-r--r-- | libguile/srfi-14.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/srfi-14.c b/libguile/srfi-14.c index 38ef32049..09fe90c63 100644 --- a/libguile/srfi-14.c +++ b/libguile/srfi-14.c @@ -2010,7 +2010,7 @@ define_charset (const char *name, const scm_t_char_set *p) SCM_NEWSMOB (cs, scm_tc16_charset, p); scm_c_define (name, cs); - return scm_permanent_object (cs); + return cs; } SCM_DEFINE (scm_sys_char_set_dump, "%char-set-dump", 1, 0, 0, (SCM charset), |