diff options
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/data.c b/src/data.c index c3cf05e0f10..a5f28375635 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -1946,8 +1946,8 @@ or a byte-code object. IDX starts at 0. */) | |||
| 1946 | if (idxval < 0 || idxval >= XBOOL_VECTOR (array)->size) | 1946 | if (idxval < 0 || idxval >= XBOOL_VECTOR (array)->size) |
| 1947 | args_out_of_range (array, idx); | 1947 | args_out_of_range (array, idx); |
| 1948 | 1948 | ||
| 1949 | val = (unsigned char) XBOOL_VECTOR (array)->data[idxval / BITS_PER_CHAR]; | 1949 | val = (unsigned char) XBOOL_VECTOR (array)->data[idxval / BOOL_VECTOR_BITS_PER_CHAR]; |
| 1950 | return (val & (1 << (idxval % BITS_PER_CHAR)) ? Qt : Qnil); | 1950 | return (val & (1 << (idxval % BOOL_VECTOR_BITS_PER_CHAR)) ? Qt : Qnil); |
| 1951 | } | 1951 | } |
| 1952 | else if (CHAR_TABLE_P (array)) | 1952 | else if (CHAR_TABLE_P (array)) |
| 1953 | { | 1953 | { |
| @@ -2074,13 +2074,13 @@ bool-vector. IDX starts at 0. */) | |||
| 2074 | if (idxval < 0 || idxval >= XBOOL_VECTOR (array)->size) | 2074 | if (idxval < 0 || idxval >= XBOOL_VECTOR (array)->size) |
| 2075 | args_out_of_range (array, idx); | 2075 | args_out_of_range (array, idx); |
| 2076 | 2076 | ||
| 2077 | val = (unsigned char) XBOOL_VECTOR (array)->data[idxval / BITS_PER_CHAR]; | 2077 | val = (unsigned char) XBOOL_VECTOR (array)->data[idxval / BOOL_VECTOR_BITS_PER_CHAR]; |
| 2078 | 2078 | ||
| 2079 | if (! NILP (newelt)) | 2079 | if (! NILP (newelt)) |
| 2080 | val |= 1 << (idxval % BITS_PER_CHAR); | 2080 | val |= 1 << (idxval % BOOL_VECTOR_BITS_PER_CHAR); |
| 2081 | else | 2081 | else |
| 2082 | val &= ~(1 << (idxval % BITS_PER_CHAR)); | 2082 | val &= ~(1 << (idxval % BOOL_VECTOR_BITS_PER_CHAR)); |
| 2083 | XBOOL_VECTOR (array)->data[idxval / BITS_PER_CHAR] = val; | 2083 | XBOOL_VECTOR (array)->data[idxval / BOOL_VECTOR_BITS_PER_CHAR] = val; |
| 2084 | } | 2084 | } |
| 2085 | else if (CHAR_TABLE_P (array)) | 2085 | else if (CHAR_TABLE_P (array)) |
| 2086 | { | 2086 | { |