776 |
if (NILP (position)) |
if (NILP (position)) |
777 |
{ |
{ |
778 |
if (NILP (limit)) |
if (NILP (limit)) |
779 |
position = make_number (XSTRING (object)->size); |
position = make_number (SCHARS (object)); |
780 |
else |
else |
781 |
position = limit; |
position = limit; |
782 |
} |
} |
842 |
if (NILP (position)) |
if (NILP (position)) |
843 |
{ |
{ |
844 |
if (NILP (limit)) |
if (NILP (limit)) |
845 |
position = make_number (XSTRING (object)->size); |
position = make_number (SCHARS (object)); |
846 |
else |
else |
847 |
position = limit; |
position = limit; |
848 |
} |
} |
935 |
|
|
936 |
if (NULL_INTERVAL_P (next)) |
if (NULL_INTERVAL_P (next)) |
937 |
XSETFASTINT (position, (STRINGP (object) |
XSETFASTINT (position, (STRINGP (object) |
938 |
? XSTRING (object)->size |
? SCHARS (object) |
939 |
: BUF_ZV (XBUFFER (object)))); |
: BUF_ZV (XBUFFER (object)))); |
940 |
else |
else |
941 |
XSETFASTINT (position, next->position); |
XSETFASTINT (position, next->position); |
955 |
return limit; |
return limit; |
956 |
if (NILP (limit)) |
if (NILP (limit)) |
957 |
XSETFASTINT (limit, (STRINGP (object) |
XSETFASTINT (limit, (STRINGP (object) |
958 |
? XSTRING (object)->size |
? SCHARS (object) |
959 |
: BUF_ZV (XBUFFER (object)))); |
: BUF_ZV (XBUFFER (object)))); |
960 |
if (!(next->position < XFASTINT (limit))) |
if (!(next->position < XFASTINT (limit))) |
961 |
return limit; |
return limit; |
1035 |
return limit; |
return limit; |
1036 |
if (NILP (limit)) |
if (NILP (limit)) |
1037 |
XSETFASTINT (limit, (STRINGP (object) |
XSETFASTINT (limit, (STRINGP (object) |
1038 |
? XSTRING (object)->size |
? SCHARS (object) |
1039 |
: BUF_ZV (XBUFFER (object)))); |
: BUF_ZV (XBUFFER (object)))); |
1040 |
if (!(next->position < XFASTINT (limit))) |
if (!(next->position < XFASTINT (limit))) |
1041 |
return limit; |
return limit; |
1306 |
get rid of its intervals. */ |
get rid of its intervals. */ |
1307 |
if (NILP (properties) && STRINGP (object) |
if (NILP (properties) && STRINGP (object) |
1308 |
&& XFASTINT (start) == 0 |
&& XFASTINT (start) == 0 |
1309 |
&& XFASTINT (end) == XSTRING (object)->size) |
&& XFASTINT (end) == SCHARS (object)) |
1310 |
{ |
{ |
1311 |
if (! XSTRING (object)->intervals) |
if (! STRING_INTERVALS (object)) |
1312 |
return Qt; |
return Qt; |
1313 |
|
|
1314 |
XSTRING (object)->intervals = 0; |
STRING_INTERVALS (object) = 0; |
1315 |
return Qt; |
return Qt; |
1316 |
} |
} |
1317 |
|
|