martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(Fset_match_data): Be sure to make search_regs always sane.

Browse Source
This commit is contained in:
Kenichi Handa
2000-10-30 04:10:22 +00:00
parent 8040607089
commit e62371e929
1 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/search.c
View File

@@ -2746,6 +2746,9 @@ LIST should have been created by calling `match-data' previously.")
length * sizeof (regoff_t));
}
for (i = search_regs.num_regs; i < length; i++)
search_regs.start[i] = -1;
search_regs.num_regs = length;
}
}
@@ -2760,6 +2763,8 @@ LIST should have been created by calling `match-data' previously.")
}
else
{
int from;
if (MARKERP (marker))
{
if (XMARKER (marker)->buffer == 0)
@@ -2769,7 +2774,7 @@ LIST should have been created by calling `match-data' previously.")
}
CHECK_NUMBER_COERCE_MARKER (marker, 0);
search_regs.start[i] = XINT (marker);
from = XINT (marker);
list = Fcdr (list);
marker = Fcar (list);
@@ -2777,6 +2782,7 @@ LIST should have been created by calling `match-data' previously.")
XSETFASTINT (marker, 0);
CHECK_NUMBER_COERCE_MARKER (marker, 0);
search_regs.start[i] = from;
search_regs.end[i] = XINT (marker);
}
list = Fcdr (list);