summaryrefslogtreecommitdiff
path: root/libguile/deprecated.c
diff options
context:
space:
mode:
authorDaniel Llorens <lloda@sarc.name>2021-08-16 19:02:43 +0200
committerDaniel Llorens <lloda@sarc.name>2021-08-16 19:02:43 +0200
commit3df3ba1a2c956bba122328e1fc4be614171a4f42 (patch)
treed905779c2a31f7909ded18c46462afe65a68e353 /libguile/deprecated.c
parentc60601332e8f328b014ac09ebd9b0e1c562f9238 (diff)
downloadguile-3df3ba1a2c956bba122328e1fc4be614171a4f42.tar.gz
Remove array contp flag
This flag was set, but never used in Guile, and there was no documented API to access it. To check if an array is contiguous, use (array-contents <> #t). * libguile/arrays.h (scm_i_raw_array): New function. SCM_I_ARRAY_CONTIGUOUS, SCM_SET_ARRAY_CONTIGUOUS_FLAG, SCM_CLR_ARRAY_CONTIGUOUS_FLAG, SCM_I_ARRAY_CONTP: Remove. scm_t_array_dim: Declare here, not in array-handle.h. SCM_I_ARRAY_NDIM: Shift by one bit since the contp flag isn't there anymore. * module/syste/vm/assembler.scm: Match removal of contp flag. * libguile/arrays.c (scm_i_make_array): Reuse scm_i_raw_array. (scm_i_ra_set_contp): Remove. (scm_transpose_array): Don't set or clear the contp flag. (scm_make_shared_array): Don't set or clear the contp flag. (scm_make_typed_array): Don't set the contp flag. * libguile/array-map.c (scm_i_array_rebase): Reuse scm_i_raw_array.
Diffstat (limited to 'libguile/deprecated.c')
-rw-r--r--libguile/deprecated.c1
1 files changed, 0 insertions, 1 deletions
diff --git a/libguile/deprecated.c b/libguile/deprecated.c
index 7ec08ec50..277a4d9ed 100644
--- a/libguile/deprecated.c
+++ b/libguile/deprecated.c
@@ -608,7 +608,6 @@ scm_from_contiguous_typed_array (SCM type, SCM bounds, const void *bytes,
"to copy data to the new array.");
ra = scm_i_shap2ra (bounds);
- SCM_SET_ARRAY_CONTIGUOUS_FLAG (ra);
s = SCM_I_ARRAY_DIMS (ra);
k = SCM_I_ARRAY_NDIM (ra);