diff options
author | Marius Vollmer <mvo@zagadka.de> | 2004-09-29 15:58:19 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2004-09-29 15:58:19 +0000 |
commit | 0f63e88d5d64d7212dfa2c1acc31ee3fc5106867 (patch) | |
tree | 3019c75bbc9f0bace7d68bd68ed6243520fed1c7 | |
parent | 39127bc5108a85bb721120a72f178a858e73dac5 (diff) | |
download | guile-0f63e88d5d64d7212dfa2c1acc31ee3fc5106867.tar.gz |
(scm_array_equal_p): Include scm_tc7_svect in switch. Thanks to
Roland Orre!
-rw-r--r-- | libguile/ramap.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/libguile/ramap.c b/libguile/ramap.c index 0f6a2c4fd..6c72783c7 100644 --- a/libguile/ramap.c +++ b/libguile/ramap.c @@ -2015,6 +2015,7 @@ scm_array_equal_p (SCM ra0, SCM ra1) case scm_tc7_byvect: case scm_tc7_uvect: case scm_tc7_ivect: + case scm_tc7_svect: case scm_tc7_fvect: case scm_tc7_dvect: case scm_tc7_cvect: @@ -2034,6 +2035,7 @@ scm_array_equal_p (SCM ra0, SCM ra1) case scm_tc7_byvect: case scm_tc7_uvect: case scm_tc7_ivect: + case scm_tc7_svect: case scm_tc7_fvect: case scm_tc7_dvect: case scm_tc7_cvect: |