mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-24 12:20:20 +02:00
Code Activity

SCM_CELL in srfi-4.c

Browse source 
* libguile/srfi-4.c (SCM_UVEC_TYPE, SCM_UVEC_LENGTH, SCM_UVEC_BASE): Fix
  SCM_CELL macro usage.
This commit is contained in:
Andy Wingo 2009-12-08 21:54:27 +01:00
parent 9e9e54eb19
commit 00f8b368ca
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
libguile/srfi-4.c
View file

@ -65,9 +65,9 @@ int scm_tc16_uvec = 0;
- The vector's length (counted in elements).
- The address of the data area (holding the elements of the
vector). */
#define SCM_UVEC_TYPE(u) (SCM_CELL_WORD_1(u))
#define SCM_UVEC_LENGTH(u) ((size_t)SCM_CELL_WORD_2(u))
#define SCM_UVEC_BASE(u) ((void *)SCM_CELL_WORD_3(u))
#define SCM_UVEC_TYPE(u) (SCM_SMOB_DATA_1(u))
#define SCM_UVEC_LENGTH(u) ((size_t)SCM_SMOB_DATA_2(u))
#define SCM_UVEC_BASE(u) ((void *)SCM_SMOB_DATA_3(u))
/* Symbolic constants encoding the various types of uniform