diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1996-08-20 17:12:43 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1996-08-20 17:12:43 +0000 |
commit | 8d71b0ce987192a494aba4e8e8b653f2bbacf1fb (patch) | |
tree | 80c6b995c7d9dad831bbcc7b22122040015ebb3a | |
parent | e137c6b3e3bcf8d41a7c7d78e2acaa778357b758 (diff) | |
download | guile-8d71b0ce987192a494aba4e8e8b653f2bbacf1fb.tar.gz |
*** empty log message ***
-rw-r--r-- | libguile/scmconfig.h.in | 11 | ||||
-rw-r--r-- | libguile/weaks.c | 16 | ||||
-rw-r--r-- | libguile/weaks.h | 8 |
3 files changed, 20 insertions, 15 deletions
diff --git a/libguile/scmconfig.h.in b/libguile/scmconfig.h.in index 9d828e001..027cf57b8 100644 --- a/libguile/scmconfig.h.in +++ b/libguile/scmconfig.h.in @@ -54,6 +54,11 @@ /* Define to `int' if <sys/types.h> doesn't define. */ #undef uid_t +/* Define these two if you want support for debugging of Scheme + programs. */ +#undef DEBUG_EXTENSIONS +#undef READER_EXTENSIONS + /* Define this if your system has a way to set a stdio stream's file descriptor. You should also copy fd.h.in to fd.h, and give the macro SET_FILE_FD_FIELD an appropriate definition. See @@ -176,6 +181,9 @@ /* Define if you have the <sys/dir.h> header file. */ #undef HAVE_SYS_DIR_H +/* Define if you have the <sys/ioctl.h> header file. */ +#undef HAVE_SYS_IOCTL_H + /* Define if you have the <sys/ndir.h> header file. */ #undef HAVE_SYS_NDIR_H @@ -194,9 +202,6 @@ /* Define if you have the <sys/types.h> header file. */ #undef HAVE_SYS_TYPES_H -/* Define if you have the <sys/ioctl.h> header file. */ -#undef HAVE_SYS_IOCTL_H - /* Define if you have the <time.h> header file. */ #undef HAVE_TIME_H diff --git a/libguile/weaks.c b/libguile/weaks.c index 8479d76f5..ff0926599 100644 --- a/libguile/weaks.c +++ b/libguile/weaks.c @@ -119,18 +119,18 @@ scm_weak_vector_p (x) -SCM_PROC(s_make_weak_hash_table, "make-weak-hash-table", 1, 0, 0, scm_make_weak_hash_table); +SCM_PROC(s_make_weak_key_hash_table, "make-weak-key-hash-table", 1, 0, 0, scm_make_weak_key_hash_table); #ifdef __STDC__ SCM -scm_make_weak_hash_table (SCM k) +scm_make_weak_key_hash_table (SCM k) #else SCM -scm_make_weak_hash_table (k) +scm_make_weak_key_hash_table (k) SCM k; #endif { SCM v; - SCM_ASSERT (SCM_INUMP (k), k, SCM_ARG1, s_make_weak_hash_table); + SCM_ASSERT (SCM_INUMP (k), k, SCM_ARG1, s_make_weak_key_hash_table); v = scm_make_weak_vector (k, SCM_EOL); SCM_ALLOW_INTS; SCM_VELTS (v)[-1] = 1; @@ -171,7 +171,7 @@ scm_make_doubly_weak_hash_table (k) #endif { SCM v; - SCM_ASSERT (SCM_INUMP (k), k, SCM_ARG1, s_make_weak_value_hash_table); + SCM_ASSERT (SCM_INUMP (k), k, SCM_ARG1, s_make_doubly_weak_hash_table); v = scm_make_weak_vector (k, SCM_EOL); SCM_ALLOW_INTS; SCM_VELTS (v)[-1] = 3; @@ -179,13 +179,13 @@ scm_make_doubly_weak_hash_table (k) return v; } -SCM_PROC(s_weak_hash_table_p, "weak-hash-table?", 1, 0, 0, scm_weak_hash_table_p); +SCM_PROC(s_weak_key_hash_table_p, "weak-key-hash-table?", 1, 0, 0, scm_weak_key_hash_table_p); #ifdef __STDC__ SCM -scm_weak_hash_table_p (SCM x) +scm_weak_key_hash_table_p (SCM x) #else SCM -scm_weak_hash_table_p (x) +scm_weak_key_hash_table_p (x) SCM x; #endif { diff --git a/libguile/weaks.h b/libguile/weaks.h index 98e1cb698..426673211 100644 --- a/libguile/weaks.h +++ b/libguile/weaks.h @@ -60,10 +60,10 @@ extern SCM scm_make_weak_vector (SCM k, SCM fill); extern SCM scm_weak_vector (SCM l); extern SCM scm_weak_vector_p (SCM x); -extern SCM scm_make_weak_hash_table (SCM k); +extern SCM scm_make_weak_key_hash_table (SCM k); extern SCM scm_make_weak_value_hash_table (SCM k); extern SCM scm_make_doubly_weak_hash_table (SCM k); -extern SCM scm_weak_hash_table_p (SCM x); +extern SCM scm_weak_key_hash_table_p (SCM x); extern SCM scm_weak_value_hash_table_p (SCM x); extern SCM scm_doubly_weak_hash_table_p (SCM x); extern void scm_init_weaks (void); @@ -72,10 +72,10 @@ extern void scm_init_weaks (void); extern SCM scm_make_weak_vector (); extern SCM scm_weak_vector (); extern SCM scm_weak_vector_p (); -extern SCM scm_make_weak_hash_table (); +extern SCM scm_make_weak_key_hash_table (); extern SCM scm_make_weak_value_hash_table (); extern SCM scm_make_doubly_weak_hash_table (); -extern SCM scm_weak_hash_table_p (); +extern SCM scm_weak_key_hash_table_p (); extern SCM scm_weak_value_hash_table_p (); extern SCM scm_doubly_weak_hash_table_p (); extern void scm_init_weaks (); |