diff options
author | Andy Wingo <wingo@pobox.com> | 2014-02-08 14:48:48 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2014-02-08 14:48:48 +0100 |
commit | adf06a72d53821d34e14fa69b20b10e2f809f593 (patch) | |
tree | 9f9342a109a50e4291a0f57816cfd090e0fbe402 /libguile/weak-vector.c | |
parent | 04023cceb7584810005906b86c876d703a0e98b5 (diff) | |
parent | 495cea0c931de23f074892b3f32808e676712a18 (diff) | |
download | guile-adf06a72d53821d34e14fa69b20b10e2f809f593.tar.gz |
Merge commit '495cea0c931de23f074892b3f32808e676712a18'
Conflicts:
libguile/weaks.c
Diffstat (limited to 'libguile/weak-vector.c')
-rw-r--r-- | libguile/weak-vector.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/weak-vector.c b/libguile/weak-vector.c index b1fff1b02..082cdde01 100644 --- a/libguile/weak-vector.c +++ b/libguile/weak-vector.c @@ -189,7 +189,7 @@ scm_c_weak_vector_ref (SCM wv, size_t k) d.k = k; if (k >= SCM_I_VECTOR_LENGTH (wv)) - scm_out_of_range (NULL, scm_from_size_t (k)); + scm_out_of_range ("weak-vector-ref", scm_from_size_t (k)); ret = GC_call_with_alloc_lock (weak_vector_ref, &d); @@ -227,7 +227,7 @@ scm_c_weak_vector_set_x (SCM wv, size_t k, SCM x) d.k = k; if (k >= SCM_I_VECTOR_LENGTH (wv)) - scm_out_of_range (NULL, scm_from_size_t (k)); + scm_out_of_range ("weak-vector-set!", scm_from_size_t (k)); prev = GC_call_with_alloc_lock (weak_vector_ref, &d); |