aboutsummaryrefslogtreecommitdiffstats
path: root/src/data.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/data.c')
-rw-r--r--src/data.c12
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 {