mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-30 23:10:21 +02:00
Fix 32/64 bit bug in INTEGER_ACCESSOR_PROLOGUE
This commit is contained in:
parent
f65ccc6afe
commit
e4da1b456a
1 changed files with 1 additions and 1 deletions
|
@ -88,7 +88,7 @@
|
||||||
_sign char *c_bv; \
|
_sign char *c_bv; \
|
||||||
\
|
\
|
||||||
SCM_VALIDATE_##validate (1, bv); \
|
SCM_VALIDATE_##validate (1, bv); \
|
||||||
c_index = scm_to_uint (index); \
|
c_index = scm_to_size_t (index); \
|
||||||
\
|
\
|
||||||
c_len = SCM_BYTEVECTOR_LENGTH (bv); \
|
c_len = SCM_BYTEVECTOR_LENGTH (bv); \
|
||||||
c_bv = (_sign char *) SCM_BYTEVECTOR_CONTENTS (bv); \
|
c_bv = (_sign char *) SCM_BYTEVECTOR_CONTENTS (bv); \
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue