diff options
author | Greg J. Badros <gjb@cs.washington.edu> | 2000-01-05 19:00:03 +0000 |
---|---|---|
committer | Greg J. Badros <gjb@cs.washington.edu> | 2000-01-05 19:00:03 +0000 |
commit | 47c6b75ea980821737e8030190d24b9aa30e978d (patch) | |
tree | 94e1566e9a7bd7b8b4f3abfadde47faad8f45830 /libguile/weaks.c | |
parent | f5421cfc2a694b6c4eb9e035d583cc461994b4ce (diff) | |
download | guile-47c6b75ea980821737e8030190d24b9aa30e978d.tar.gz |
* *.[ch]: Replace SCM_VALIDATE_INT w/ SCM_VALIDATE_INUM for
better consistency with the names of other SCM_VALIDATE_ macros
and better conformance to guile naming policy.
Diffstat (limited to 'libguile/weaks.c')
-rw-r--r-- | libguile/weaks.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/weaks.c b/libguile/weaks.c index 0b5d0198d..730cd0804 100644 --- a/libguile/weaks.c +++ b/libguile/weaks.c @@ -131,7 +131,7 @@ regular hash tables. (@pxref{Hash Tables})") #define FUNC_NAME s_scm_make_weak_key_hash_table { SCM v; - SCM_VALIDATE_INT(1,k); + SCM_VALIDATE_INUM(1,k); v = scm_make_weak_vector (k, SCM_EOL); SCM_ALLOW_INTS; SCM_VELTS (v)[-1] = 1; @@ -147,7 +147,7 @@ GUILE_PROC (scm_make_weak_value_hash_table, "make-weak-value-hash-table", 1, 0, #define FUNC_NAME s_scm_make_weak_value_hash_table { SCM v; - SCM_VALIDATE_INT(1,k); + SCM_VALIDATE_INUM(1,k); v = scm_make_weak_vector (k, SCM_EOL); SCM_ALLOW_INTS; SCM_VELTS (v)[-1] = 2; @@ -164,7 +164,7 @@ GUILE_PROC (scm_make_doubly_weak_hash_table, "make-doubly-weak-hash-table", 1, 0 #define FUNC_NAME s_scm_make_doubly_weak_hash_table { SCM v; - SCM_VALIDATE_INT(1,k); + SCM_VALIDATE_INUM(1,k); v = scm_make_weak_vector (k, SCM_EOL); SCM_ALLOW_INTS; SCM_VELTS (v)[-1] = 3; |