1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-11 14:21:10 +02:00

(scm_t_array_dim): Changed type of members to ssize_t, to

fit the docs.
This commit is contained in:
Marius Vollmer 2005-01-09 15:41:14 +00:00
parent 6419ad789a
commit 4cf8074fd1

View file

@ -33,15 +33,12 @@
/** Arrays */ /** Arrays */
/* typedef struct scm_t_array_dim
an array SCM is a non-immediate pointing to a heap cell where: {
ssize_t lbnd;
CAR: bits 0-15 hold the smob type id: scm_tc16_array ssize_t ubnd;
bit 16 is the SCM_ARRAY_FLAG_CONTIGUOUS flag ssize_t inc;
bits 17-31 hold the dimension (0 -- 32767) } scm_t_array_dim;
CDR: pointer to a malloced block containing an scm_t_array structure
followed by an scm_t_array_dim structure for each dimension.
*/
typedef struct scm_t_array typedef struct scm_t_array
{ {
@ -49,13 +46,6 @@ typedef struct scm_t_array
unsigned long base; unsigned long base;
} scm_t_array; } scm_t_array;
typedef struct scm_t_array_dim
{
long lbnd;
long ubnd;
long inc;
} scm_t_array_dim;
SCM_API scm_t_bits scm_tc16_array; SCM_API scm_t_bits scm_tc16_array;
SCM_API scm_t_bits scm_tc16_enclosed_array; SCM_API scm_t_bits scm_tc16_enclosed_array;